En démontant un -34 


La table des codes du PC-1251 


Des idées, 
des programmes 
 Rougevos machines 


M 1859 - 12 - 14 FF) 


DES REVUES SPECIALISÉES 
POUR VOTRE ORDINATEUR 


Les ordinateurs sont rarement 
compatibles entre eux. C'est 
pour cette raison qu'Editrace publie 
des revues spécialisées par 
type d'ordinateur : 

ORDI-5, pour les 
SINCLAIR" (ZX81',ZX80. 
Spectrum’): 

TRACE, pour les TRS-80, 
Vidéo-Génie’ et 

poquettes SHARP. 
TRACE et ORDI-5 

vous fournissent quatre fois 
par an des programmes qui 
tournent sur “votre” machine. 

| des conseils, des astuces, de 

RS nouvelles idées d'utilisation. 
ei TRACE et ORDI-5 testent pour 
LD vous en toute objectivité et 

OR ds indépendance les produits. 

Mr matériels et logiciels adaptables 

sur ‘‘votre” ordinateur. Elles vous 

tiennent au courant sur les 

nouveautes susceptibles de vous 

intéresser. TRACE et ORDI-5 ne sont pas en vente chez 
les marchands de journaux. Pour vous abonner (ou pour recevoir 

un numéro) il vous suffit de retourner le bon de commande ci-dessous. 


BON DE COMMANDE 
à retourner à Editrace, 8 rue Saint-Marc 75002 PARIS 


Nom _ Profession ___ 
Adresse 


Pays ________ Codepostal 


O Je désire m'abonner à ORDI-5 pour 4 n°° à partir dun°1Ù  dun20 
{France 65 FF; Etranger** 75 FF; par avion 140 FF) 
D Je désire recevoir len°1 CO] len°20 d'ORDI-5 (France 20 FF; Etranger** 24 FF; par avion 35 FF) 
C1 Je désire m'abonner à TRACE pour 4 n° à partirdun°30  dun°40 {les numéros 1 et 2 sont épuisés) 
(France 85 FF ; Etranger** 100 FF; par avion 170 FF) 
Q Je désire recevoirlen°3 D  len°40 de TRACE (France 25 FF; Etranger** 30 FF) 
Ci-joint mon règlement indispensable par chèque bancaire [chèque postalO] virement D 
*# Pour les pays autres que la France, utiliser un virement en FF compte Crédit Lyonnais Paris n° 30002 00402 8401 M. Les frais de virement sont à {a charge de l'acheteur 


“TRS-80, Vidéo-Génie, SHARP, SINCLAIR, ZX81, ZX60, Spectrum sont des marques dépasées. 


1 

COUVERTURE 

Traditions légendaires et techniques 
d'avant-garde. Du fond des âges, 

un grand maître japonais médite sur l'avenir 
de l'informatique. 

José Santos l’a surpris au moment 

où il matérialisait par la pensée 

un ordinateur de poche. 


5 
ÉDITORIAL 


17 
À VOS CLAVIERS 


21 

MAGAZINE 

Entre autres nouvelles, dix d’entre vous 
apprendront que le sort les a désignés : dix 
nouveaux abonnés à vie ! 


24 

LA FONCTION GAMMA 

Ajoutez une petite astuce à un algorithme 
bien connu. Vous obtiendrez de bien 
meilleurs résultats (HP-41 C). 


25 L 

UN TRÉSOR EST CACHÉ DEDANS 
En vous essayant à ce jeu pour PC-1211, 
saurez-vous découvrir le pot aux roses ? 


27 

VOUS ÊTES PLAISANCIER ? 

La Lune et les planètes peuvent vous dire 
où vous en êtes : faisons le point (TI-59, 
FX-702 P}. 


3i 

LA LEÇON D'ANATOMIE 

Un petit reportage dans une HP-34 C. 
N'allez pas, par curiosité, démonter vatre 
machine : nous l'avons fait pour vous. 


34 

JEUX ET CALCULATRICES 

Deux applications concrètes. des générateurs 
de nombres aléatoires (exemples sur TI-57}. 


37 

LA TABLE DES CODES 

DU PC-1251 

L'exploration du dernier poquette de Sherp 
n'en est qu’à ses débuts, mais elle porte 
déjà ses fruits. 


39 

DÉCOUVREZ LE NEISCAT 

Les règles d'un nouveau jeu et le 
programme qui fait de la HP-41 CV un 
adversaire de bon niveau. 


42 

QUAND ON JOUE 

A OTHELLO-REVERSI... 

le ZX-81 peut servir de damier, se charger 
de retourner tes pions et d’arbitrer la partie. 


43 


A CHACUN SON DÜ 
Quand il faut régler plusieurs sommes en 
argent liquide, comment s'assurer facilement 


La lot du 11 mers 1957 n'autorisent, aux termes des mlinéas 2 at 3 de 
l'Art. 41, d'une part que « les copies où reproductions strictement réservées 
à l'usage privé du copiste #1 non destinées à une utiksation collective », #1. 
d'autre pari. que les enskyzes ai les courtes citations dans un bul d'oxem- 
ples et d'ustraions, « toute représentation où reproduction intégrale, ou 
partie, fans sans le consentement dt l'auteur où de ses ayants-éroit ou 
arams-cowse est Micite » labnèa 19 de l'Art 40). Cetin représentation ou 
reproduction, pes quelque procédé ce soit, constituersit donc ut 
contre façon sanctionnée par les Aït. 425 ai suivems du Code Pénal. 
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ns 


que l'on pourra faire l'appoint jusqu'au 
dernier centime ? Un programme, ici pour 
TI-58 et 59, peut l'indiquer très rapidement. 


45 
LE VALET NOIR 
En anglais, on l'appelle ‘’ Black Jack ” 


Le voici dans une version adaptée 
à la FX-602 P. 


47 

NOMBRES ET RATIONNELS 

Pour la HP-41 C, deux raisons de jongler 
avec les fractions. 


49 

LES UTILITAIRES DU PC-1500 
Les programmes « mergés » ne sont pas 
comme les autres ; examinons-les de plus 
près. Il est possible de les obtenir sans 
interface et sans magnétophone. 


50 

D'UNE MACHINE A L'AUTRE 
Quelques règles simples pour transposer sur 
TI-58/59 les programmes écrits pour TI-57. 


52 

UN PAS EN ARRIÈRE, 

TROIS PAS EN AVANT 

Trio : un jeu d’origine jivaro ? Rien n'est 
moins sûr. Quoi qu'il en soit, chacun peut 
le pratiquer avec ou sans 702 P. 


54 

LE TROU DE MEMOIRE ? 

Quand on ne sait plus sous quel nom on a 
sauvé ses programmes pour PC-1211, tout 
espoir n'est pas perdu. |! suffit de se livrer à 
un petit travail de décryptage. 


56 

UNE BONNE RÉSOLUTION 

La TI-57 s'attaque aux équations du 3° et 4° 
degré. 


58 

A COURT D'IDÉES ? 

Quelques suggestions si vous ne savez pas 
quoi programmer. 


59 

AH! SI VOUS AVIEZ SU... 

Pour en savoir plus sur lés machines que 
vous n8 connaissez pas à fond. 


61 

LE POT COMMUN 

Différents programmes pour ZX-81, 

HP-41 C, PC-1211 et 1251, FX-702 P, TI-57, 
58 et 59, 


65 

LA BONNE PAGE 

À la recherche de renseignements sur telle 
ou telle fonction de votre PC-1500, ne 
partez plus à l'aveuglette dans le manuel 
d'utilisation. 


66 Es 

UN ANCÈTRE 

HP-55 : l'une des premières calculatrices 
programmables commercialisées par 
Hewlett-Packard. il ÿ a neuf ans de cela. 
Signe particulier : un chronomètre 
incorporé. 


Notre publication contrôle les publicités commar- 
ciales avant insertion pour qu'elles soient parfaite: 
ment loyales. Eda suit les recommendations du 
Bursou de Vérification de la Publicité. Si, malgré 
ces précoutions, vous aviez une remarque à faire, 
vous nous rendnez service en écrivant au BVP. 
8P 4608, 75362 PARIS CEDEX 08. 


A: 
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le TOUT en UN 
des BASICSs 


Feist sitepale ou best soit tuners dir 


The BASIC Handbook, 2nd Edition 


par Yves Leclerc 


Dictionnaire du Basic. : 
: Puget [ir 
ME HER 
té 41 LAPULLU Î 0 É 
Duo sat alènec he Mestespuas geo ufr ques 
it Dictionnaire du Basic . :5 2 


in Lait 


u L'Eù LE LEE ‘ ! ‘ 
ie ne Dictionnaire 
Du DEEE ! 
CLS 0 1! 5e "x frite Luc KT HER [h 
* k Dictionnaire du Basic 


ROC 


1 Dictionnaire du Basic 


Male hu on MER LOTS ET 


CPR TE vite ph 
SALE PRÉSENCE ; 

: Dictionnare du Basic 

asie hé TEE éatrtn 

î CARD SE D CNE EE IMPORT 
.. Dictionnaire du Basic «1°! 


nt 
Ras en net lon pa ner Basiie Ha 


at dl 
“ Dictionnaire du Basic 


Commandez-le. 
Presnnit Hi 32 


448 pages - 185,00 FF/1425.00 FB 


P.S.1, DIFFUSION Envoyer ce bon accompagné de votre règlement à P.S.I. DIFFUSION ou à P.S.i. BENELUX 
Éditions du P.S., 


41-51, rue Jacquard J : : , ; 
BP 86 - 77400 Lagny-s/M « Je désire recevoir... exemplaires du DICTIONNAIRE DU BASIC 
FRANCE ind bats & au prix unitaire de 185,00 FF (1425,00 FB) taxes, port et emballage 


Téléphone (6) 007.59.31 compris (par avion ajouter 8 FF (75 FB) par livre). 
P.SI. BENELUX à pris (R 4 ( }pA 
5, avenue de la Ferme Rose 

1180 Bruxelles 

BELGIQUE 

Téléphone (2) 345.09.50 


en Es, en Suisse NOM 
PS. IBEAICA CRISPA 
Ferraz 1 Madrid & 16, avenue de Bsaumont fe 
Montréai Québec H 2X3 L 1 Tét. : 247.30.00 1700 Fribourg 
T4. : (514) 843.76.83 Tél. : (087) 24.43.76 Codes 


N° 12 - AVRIL 83 


A au questionnaire inséré dans notre dixième numéro, vous êtes 
plusieurs milliers à avoir répondu. Mais ce n'est pas fini : nous 


continuons à recevoir chaque jour de nouvelles réponses. Le 
dépouillement n'est donc pas terminé. 


Nombre d’entre vous nous ont communiqué leurs nom et 
adresse afin de participer au tirage au sort des dix nouveaux abon- 
nés à vie. Comme promis, le sort en a décidé au milieu du mois de 
Mars (le quinze pour être précis) et l'on trouvera la liste des 
gagnants dans la partie magazine du présent numéro. 


Avant d'aller plus loin, une précision s'impose : notre enquête 
n’a pas été menée sur un échantillon statistiquement représentatif 
des lecteurs de l'Ordinateur de poche. Ont répondu ceux qui en 
avaient envie, ceux qui en avaient le temps, ceux qui n'ont pas 
oublié de le faire, ceux qui n’ont pas prêté leur exemplaire de l'Op 
à un ami qui — justement — a oublié de le leur rendre, etc. Les 
résultats provisoires que nous avons actuellement sont donc à la 
fois partiels et délicats à interpréter. 


Ces précautions prises, quels premiers enseignements tirer des 
réponses reçues ? Une constatation tout d’abord : vous écrivez faci- 
lement à l’Ordinateur de poche. Le nombre des questionnaires que 
vous nous avez retournés suffit à le prouver. Mais cela, nous le 
savions déjà ; votre courrier en témoigne quotidiennement. À ce 
propos, saviez-vous que la plupart des articles qui font votre journal 
émane des lecteurs, c’est-à-dire de vous ? 


Parmi les tendances qui se dégagent dès maintenant de notre 
enquête, vous serez peut-être surpris d'apprendre que nos 
abonné(e})s ont, en proportion, répondu beaucoup plus que ceux 
et celles qui achètent l’Op chez leur marchand de journaux. 


Autre sujet d’étonnement : très peu de femmes ont répondu à 
notre enquête. Faut-il en conclure que l'informatique de poche est 
principalement pratiquée par les hommes ? Il y a ici, à la rédaction 
du journal, des personnes (des deux sexes !) qui se demandent 
pourquoi et qui n’ont aucune idée sur les raisons d'un tel phéno- 
mène. Voilà peut-être un très beau sujet de recherche en psycho- 
sociologie. 


Troisième élément : il semble qu’une forte proportion de nos lec- 
teurs fréquentent les lycées ou les établissements d'enseignement 
supérieur, en tant qu'élèves ou en tant qu'enseignants. Quant aux 
autres, ils exerceraient des professions aussi variées que possibles. 
C'est dire qu'ils ne sont pas tous informaticiens, il s'en faut de 
beaucoup ! 

Enfin, une autre partie de notre enquête nous fournit une indica- 
tion qui, même si elle doit être interprétée avec prudence comme 
les autres, n’est certainement pas insignifiante. Plus de sept person- 
nes sur dix déclarent pratiquer l'informatique de poche, entre 
autres raisons utiles, pour leurs loisirs. 


D lOp 
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L'utilisateur crée ses propres 
programmes en langage évolué 
le Basic et en assembleur Z 80, 
Une telle utilisation permet la 
mise au point de programmes 
spécifiques et personnels. 


Nouveau manuel BASIC gratuit 
Pour que vous puissiez assimiler facilement et 
rapidement le langage informatique le plus usuel, 
chaque ZX 81 est accompagné d'un manuel de 
programmation en langage BASIC. Rédigé en 
français, it permet d'étudier les premiers princi- 
pes puis de poursuivre jusqu'aux programmes 
complexes. 


CT 


OPTION 
Mémoire RAM 16 K octets 


La mémoire RAM se fiche sur le connecteur 
arrière de l'ordinateur : elle multiplié par 16 la 
capacité de votre mémoire de données/pro- 
gramme ! Vous pouvez l'utiliser pour les program- 
mes longs etcomplexes,oucomme base de don- 
nées personnelles. 


EN OPTION 


Imprimante Sinclair 
Conçue exclusivement pour le ZX 81 (et pour le 
ZX 80 avec la ROM BASIC 8K),cette imprimante 
écrit tous les caractères alphanumériques sur 
82 colonnes ettrace des graphiquestrès sophisti- 
qués, reprenant ainsiexactement ce quise trouve 
sur l'écran du téléviseur. 


NT 
EN KIT OU MONTÉ 


Quelques heures de travail suffisent pour monter 
le ZX 81 en kit. 


Les versions montées et en kit contiennent 
l'adaptateur secteur et tous les conducteurs 
requis pour connecter le ZX 81 à votre téléviseur 
{couleur ou noir et blanc) et à votre enregistreur/ 
lecteur de cassette. 


L'ORDINATEUR QUI LIBERE 
INFORMATIQUES 


Sinclair 
_ZX8 


Complet 
en Kit 


Comment l'utiliser? 


Auriez-vous imaginé, il y a seulement 
un an, pouvoir disposer à ce prix d'un véri- 
table ordinateur, performant et polyvalent ? 
idéal pour s'initier (programmation simple 
et lecture à l'écran parfaitement identi- 
fiable}, le Sinclair répond exactement à l'at- 
tente des utilisateurs désireux de mettre au 
point des programmes spécifiques et per- 
sonnels. Mais il se prête aussi à une grande 
variété d'utilisations: scientifiques, gestion, 
jeux... 


Enfin, les cassettes pré-enregistrées 
de la gamme Sinclair permettent aux 
parents et aux enfants de se passionner 
pour les jeux électroniques. Cette pré- 
cieuse polyvalence est l'une des causes 
principales du succès sans précédent du 
Sinclair ZX 81. 


Utilisation scientifique : une société 
de haute technologie emploie 

le Sinclair ZX 81 à des fins 
. de calculs scientifiques'et 
de gestion de processus. 


VOS TALENTS 


qu 


Ses capacités 
vous permettront 


de dépasser sans cesse vos propres limites. 


800.000 adeptes parmi les pro- 

fessionnels de l'informatique et 
les amateurs expérimentés, c'est parce que 
ses performances, tout à fait respectables, 
leur permettent de laisser libre cours à leur 
esprit inventif. 


S, le ZX 81 a déjà fait plus de 


Jugez plutôt : le clavier du Sinclair 
ZX 81 se compose de 40 touches, mais, utili- 
sant le système d'entrée des mots-clés par 
une seule touche, il donne l'équivalent de 
91 touches. ll contient une ROM BASIC 8K 
nouvelle et plus puissante qui constitue 
“l'intelligence domestiquée” de l'ordina- 
teur. Ce dispositif permet des calculs en vir- 
gule flottante, traite toutes fonctions 
mathématiques et graphiques, gère les 
données. Son logiciel développé le rend 
apte àtoutesles utilisations notamment loi- 
sirs et enseignement. 


Comment obtenir 
de telles capacités 
pour un prix aussi bas ? 


800.000 “Sinclair” ont déjà conquis 
l'Europe et l'Amérique dont 60.000 ont 
déjà été livrés en France. 

Impensable il y a quelques années, ou 
même quelques mois : vous pouvez entrer 
en possession d'un véritable ordinateur, 
performant et polyvalent, pour moins de 
800 F (et moins de 600 F en kit). 


NOUVEAU 


e magasin d’exposition-vente : 


7, rue de Courcelles, 75008 Paris. 
Métro : St-Philippe-du-Roule. 


tres avantages : 

e Branchement direct sur la prise antenne de 
votre téléviseur, au standard Français. 

e possibilité d'enregistrer et de conserver sur 


e différentes applications liées à l'utilisa- 
tion de muitiples périphériques et logiciels 
disponibles. 

e Le Sinclair ZX Btest garanti 1 an avec 
échange standard. 


Le ZX 81 vous permet de bénéficier d'au- 


cassette des programmes et des données. 


{tout simplement en branchantsur le ZX 81, avec 
le fil de connection livré gratuitement, le lecteur/ 
enregistreur de cassettes que vous avez déjà}. 
e gamme complète de fonctions mathémati- 
ques et scientifiques avec une précision de 9 
positions décimales. 

e tableaux numériques et alphanumériques 
muiti-dimensionnels.. 

e 26 boucles FOR/NEXT imbriquées... 


Renvoyez-vite le coupon ci-dessous : il 
vous permet de commander le ZX 81 en kit 
ou monté, l'extension de mémoire et l'impri- 
mante. Votre commande vous parviendra 
dans les délais indiqués ci-dessous quivous 
sont toutefois donnés à titre indicatif et peu- 
vent varier en fonction de la demande. Vous 
serez libre, si vous n'êtes pas satisfait, de 
renvoyer votre ZX 81 dans les 15 jours : nous 
vous rembourserons alors intégralement. 


e mémoire vive 1K-octets pouvant être portée à 


16 K octets grâce au module RAM Sinclair. 


Pour toutes informations : 359.72.50 + 


pen nnn nn nn nn nee nn e DD = 


Bon de commande 


A retourner à Direco International, 30, avenue de Messine, 75008 PARIS 


+ 
[=] 
Oui, je désire recevoir, sous 8semaines (délai indicatif), avec le manuel gratuit de programmation, par = 
paquet poste recommandé : © 


[lle Sinclair ZX 81 en kit pour 590 F TTC 


[le Sinclair ZX 81 monté 
pour le prix de 790 F TTC 


D l'extension mémoire 16K RAM, 
pour le prix de 380 F TTC 


C3 l'imprimante pour le prix de 690 F TTC. 
(Prix en vigueur au 1€' janvier 1983) 


Je choisis [] par CCP où chèque bancaire établi à l'ordre de Direco International, 


de payer: joint au présent bon de commande 

[] directement au facteur, moyennant une taxe de contre-remboursement de 14 F. 
Nom a Prénom 
Rue : N° _ Commune _ 


Code postal L___1 1 1 ! Signature , 
(pour les moins de 18 ans, signature de l'un des parents). 


Au cas où je ne serais pas entièrement satisfait, je suis libre de vous retourner mon ZX 81 dans 
les 15 jours. Vous me rembourserez alors entièrement. 


Sinclair ZX 81 


A PARLER 


_S0vVEZz 


“RORTH 


Avec le Jupiter ACE, accédez à l’informatique de l'avenir. 


présence de la deuxième généra- 
tion d'ordinateurs domestiques. Après 
avoir fait ses preuves dans des domaines 
aussi précis que laéronautique, la 
recherche scientifique et l'industrie, le 
Forth fait une entrée remarquée chez le 
particulier, même débutant. Plus sophis- 
tiqué que le Basic, le Forth est pourtant 
d'un apprentissage plus aisé et plus 
rapide. 


A" le Jupiter Ace, nous sommes en 


Plus qu’un langage, un système 


Le Forth se définit communément 
comme un «système» informatique plu- 


tôt qu'un «langage» informatique. Un 
système original qui ne ressemble à 
aucun autre. Un système dont la pro- 
grammation très compacte permet une 
utilisation maximale de l’espace mémoire. 


Un système à structure modulable 


La caractéristique essentielle du Forth 
est d’être un langage évolutif. Sila plupart 
des langages informatiques sont figés en 
des instructions définies etinvariables, le 
Forth laisse la possibilité à l'utilisateur de 
compléter à l'infini un dictionnaire d’ins- 
tructions déjà très riche. 


Le dictionnaire Forth 

La mémoire interne (ROM) du Jupiter 
Ace comprend un nombre important 
d'instructions (150 environ) auxquelles 
vous rajouterez facilement toutes celles 
que vous créerez en fonction de vos 
besoins. En effet, à chaque sous-pro- 
gramme sera associé un nom qui, dès 
lors, deviendra une instruction à part 
entière. Vous aurez généré ainsi de nou- 
veiles procédures. Le dictionnaire initial, 
en permanence complété par lutilisa- 
teur, est à l’origine de la puissance et de la 
très grande maniabilité du Forth, et per- 
met l'élaboration de programmes très 
compacts. 


La mémoire Forth 


La puissance du Jupiter Ace réside aussi 
dans le fait que les données sont littérale- 
ment «empilées» en mémoire. La der- 
nière information stockée se trouve par 
conséquent la première accessible sans 
qu’il soit nécessaire de faire appel à une 
adresse précise. Cette caractéristique 
confère au Jupiter Ace une vitesse d'exé- 
cution considérablement supérieure aux 
autres langages. Pour exécuter les opéra- 
tions qui suivent (1000 identiques), le 
temps mis par le Jupiter Ace sera : 


Type 
d'opération 


boucle vide 
impression caract. 
add. 2 nombres 


Temps 
d'exécution 


mult. 2 nombres 


Vendu 1140 F TTC en modèle de base, le 
Jupiter Ace est conçu pour recevoir des 
extensions de mémoire de 16 K et 48 K. 


F 


pes, 


Un manuel clair en français pour vous int- 
her rapidement au Forth. 


Un langage unique en son genre 


Le Jupiter Ace, en utilisant le Forth, 
devient grâce à la souplesse de ce langage, 
le micro-ordinateur des fonctions les 
plus complexes comme celui des fonc- 
tions les plus simples pour tous ceux 
désireux de s'initier. 

Les multiples possibilités du Jupiter Ace 
lui assurent d’être le micro-ordinateur 
des prochaines années. 


Soyez les premiers à parler Forth. 
Remplissez et renvoyez rapidement le 
bon de commande ci-contre. Vous rece- 
vrez votre Jupiter Ace dans les quatre 
semaines qui suivent. 

Si, au cas fort improbable, après 15 
jours d'utilisation du Jupiter Ace, vous 
n’en étiez pas satisfait, il vous suffirait de 
nous renvoyer votre ordinateur. Nous 
vous rembourserions immédiatement et 
intégralement. 

Pour tous renseignements complé- 
mentaires, téléphonez au 603.07.50. 


Enfin une véritable informatique puissante à usage domestique. 


Informations techniques 


Matériel 

Z 80 À. Vitesse : 3,25 MHz, 8 K octets ROM. 
3 K octets RAM. 

Clavier 

40 touches mécaniques avec auto-répétition 
sur chaque touche. 

Ecran 

Mémoire écran (32 colonnes sur 24 lignes). 
Affichage programmation. 

Graphiques 

Ecran divisible en 64 x 48 zones {noircies, 
blanchies ou clignotantes). 

Le jeu complet de caractères (128) et leur vidéo 
inverse peuvent être redéfinis pour permettre 
une résolution graphique très précise (256 
x 192). 

Ordres de contrôle 

IF-ELSE-FHEN, DO-LOOP, DO + LOOP, 
BEGIN-WHILE-REPEAT, BEGIN-UNTIL : 
mixables ou liabies entre eux, 


GRATUIT 


assette 
Sauvegarde sur cassette des programmes et 
des données. Vérification de la sauvegarde et 
de la restitution. 
Chaînage des programmes. Des blocs de mé- 
moire peuvent être sauvés, restitués, vérifiés 
et rechargés. Programmes titrés. Connectable 
à la plupart des magnétophones portables. 
Vitesse 
1500 bauds. 
Bus d'expansion 
Permet deconnecter extensions de mémoires 
et autres périphériques. Contient alimenta- 
tion et signaux spécifiques du Z 80 A. 
Structure des données 
Intégration, virgule flottante et chaîne de 
caractères peuvent être dressées comme 
constantes, variables en de muluples dimen- 
sions, et mélangées sans restriction de nom. 
Son 
Haut-parleur interne programmable sur toute 
la gamme sonore. 


PREMIÈRE CASSETTE 
TRE RENE LOGICIEL. 


2° DE VOTRE FUTUR OCR — 


p=-------"Bon de commande-=-==== 


>E- 


À renvoyer à : VALRIC-LAURÉNE -6, rue Jules-Simon - 92100 BOULOGNE. Tél. : 603.07.50 


Je désire recevoir le micro-ordinateur Jupiter Ace (garanti lan), avec sonadaptateur secteur etson 
manuel d'utilisation pour le prix de 1140 F TIC (frais de port inclus), plus gratuitement 
la première cassette de mon futur logiciel. 


Nom _____ Prénom . 
Profession = 
Adresse E 
Code postalL_1 1 1 1 {Ville 

Tél. (bur.) Tél. (dom) 


Signature (pour les moins de 18 ans, signature de l’un des parents) 


Mode de règlement, joint à la commande : [ Chèque bancaire ou CCP De 
D Contre-remboursement (+ 16 F à la livraison) 


Jupiter ÂCE 


ut MN GR UD CD ME DE RS GUN DS OS OS QUE OUR DE GS ue MR MER US ON OU D 
créas consens 


Commandez 
‘album n°1 


Les 5 premiers numéros de 

L'ORDINATEUR DE POCHE ont été regroupés dans un album. 

Pour disposer de l'O.P. dans un format agréable et bien adapté à son classement dans 

votre bibliotheque, commandez aujourd'hui même L'ALBUM N°1 à l'aide du bulletin ci-dessous. 


BULLETIN DE COMMANDE : retourner à 
L'ORDINATEUR DE POCHE, service albums, 39 rue de la Grange aux Belles 75484 Paris Cedex 10 
Nom £ Pere Prénom 


Adresse 2e L nu 
Pays ne. Code postal … Ville 


Veuillez me faire parvenir l'album N°1 de L'ORDINATEUR DE POCHE 
Ci-joint mon règlement de 50 FF (frais d'envoi inclus) (Etranger : 65 FF; Belgique : 500 FB; Suisse : 18 FS) 


PRRTEZ A LA DECOUVERTE 
DES MICRO-ORDINATEURS AVEC 


Les ouvragés de ue callecton répondent à tou- DECOUVREZ LE ZX81 ET LE TIMEX 
tes vos questions sur le fonctionnement et les possi- 
LM ea Se SINCLAIR 1000 Douglas HERGERT 

Réf. : 256 - 200 pages - Prix : 75 F (parution Mai). 
DECOUVREZ LE SHARP PC-1500 ela connexion de votre micro-ordinateur au 
ET LE TRS-80 PC-2 Michel LHOIR téléviseur, 


Tome 1 - Réf. : 261 - 240 pages - Prix : 80 F. + les possibilités d'extension grâce aux différents + la programmation et ses diverses applicotions : 
Tome 2 (ere Moi} - Réf. 62 - 224 pages - rene (mognétophone, imprimante, mo- calculs, graphiques, dessin en couleur sur écran TV, 
dule, ‘tablette digitale, mémoire...) jeux. 


SYBEX : 80 titres sur la micro-informatique 


Prix : 


Nom : Adresse : 


Code postal : {11} Ville : 


Je désire recevoir : [ Votre catalogue détaillé gratuit} 
SYBEX (1 Les livres suivants : ____ ex. réf. 256, ___ ex. réf. 261, ___ ex. réf. 262 
Ci-joint, mon règlement plus frais d'envoi : 1 livre : 12,50 F - 2 à 4 : 21,00 F - 4 à 8: 25,00 F. 


4 Place Félix Eboué - 75583 PARIS Cedex 12 - Tél, : (1) 347.30.20 - Télex : 211 802 F 
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La découverte du PC-1500 

per Jean-Pierre Richard 

Un ouvrage pour les néophytes curigux qui 
veulent en savoir plus sur leur ordinateur de 
poche PC-1500 {ou TRS-80 PC-2:. Ë 

instructions et commangas”e 
Queis types de vagable 


Be 0 PC-1500". Un manuel riche de 
ds les éléments nécessaires à la program- 
mation en Basic, largement compiété d'exer- 
cices, d'exemples «tapplicatert et. un 
index. paruhon le 10.04.83 
Série verte - Forint 14,5 x 2: 

2D8 pages - 92,00 FF/710,00 FB 


La découverte du PC-1211 
par Jean-Pierre Richard 


Série varie - Format : 14,5 x 21 
152 pages - 82,00 FF/635,00 FB 


Récréalions pour 11-57 Tome 1 
par Jacques Deconchat 


Sérle verte - Formar : 17 x 25 
168 pages - 82,00 FF/635,00 FB 


au Canada 
SCE inc en Espagne CRISPA 


3449 rue Saint-Denis 
Montréal Québec H 2X3 Lt 
Tél. : (514) 843.76.63 


Programmer HP-41 

par Philippe Descamps 

et Jean-Jacques Dhénin 

Ce 1° volume étudie HP-41 sans ses péri- 
phériques. selon quatre axes, les textes 
etles drapeaux, la pile opératiannelle. les 
tableaux numériques et les chaines de 
caractères Une quarantaine de nouvelles 
lonchons. fournies sous torme de code 
barre, les index et les tableaux rassem- 
biés en annexe constituent un outil 0e 
référence permanent. 

Série rouge - Format : 4,5 x 21 


176 pages - 102,00 FF/785,00 FB 


Récréations pour T1-57 

Tome 2 

par Jacques Deconchat 

45 nouvelles idées de jeux pour votre 
TI-$7. Cependant des indications sur 
l'adaptation à d'autres machines sont 
fournies en annexe. Un exemple d'exécu- 
tion est fourni avec chague programme 
permettant de véritier san bon fonction- 
nement et de mieux percevoir les diffé- 
rentes techniques d'affichage utilisées. 
Série bleue - Format : 17 x 25 


176 pages - 82,00 FF/635,00 FB 


Variations pour PC-1211 

par Jean-François Sehan 

Un recueil de programmes exploitant au 
maximum les possibilités de l'ordinateur 
de poche PC-1211 (ou TRS-80 pocket} 
20 variations sont proposées, du [eu des 
moutons aux histogrammes en passant 
par la gestion de fichier et les conjugaisons 
Série bleue - Format : 17 x 25 


136 pages - 82,00 FF/635,00 F8 


Collèges - Paguettes et Maths 

par Jacques Deconchat 

Ce livre destiné aux élèves des classes 
de collège et à tous ceux qui cherchent 
à mieux saisir lés techniques de pro- 
grammätion des calculatnces program- 
mables, propose 35 programmes d arith- 
métique, d'algèbre et de géométrie 
Chaoue programme est introduit par un 
rappel mathématique puis les algorith- 
mes, illustrés par un exemple d'exécution 
sur TI-57, sont commentés el accompà- 
gnés d'orgamgrammes permettant ainsi 
l'adaptation sus loule autre Doque lle 
Série verle - Format : 17 x 25 


200 pages - 92,00 FF 710,00 F8 
—— 


La découverte du FX-702 P 
par Jean-Pierre Richard 
Instructions et commandes. variables et 
mémoires, fonctions périphériques. cet 
ouvrage fournit aux débutants tous les 
éléments de basé nécessaires à la pro- 
LT en langages Basic de ta 
asio FX 702 P. ll est complété de nom- 
breux exemples et exercices d'apph- 
cation 
Série verte - Format : 14,5 x 21 


216 pages - 92,060 FF/710,00 FB 
Suñes pour PC 1500 


par Jean-François Sehan 

Destiné aux possesseurs de Sharp PC- 
1500 et de PC-2 Tandy, cel ouvrage abor- 
de. par l'exemple, là programmation de 
ces ‘micros-poches"”. Chaque program- 
me est commenté et expliqué par un 
orgamgramme et la liste des variables 
Alors, Sur ta base de ces 20 programmes. 
parlez tout chuss sur les pistes ennel- 
gées. transfarmez votre ‘’poquette en 
piano. éditez les factures de vos clients et 
… Inventez-en d'autres !. 


Série bleue - Format : 17 x 25 
160 pages - 82,00 FF/635.00FB 


P.S.1. IBERICA 
Ferraz #1 Madrid 8 
Tél. : 247,30,00 


P.S.I. DIFFUSION 

41-51, rue Jacquard 

BP 86 - 77402 Lagny-s/Marne Cedex 
FRANCE 

Téléphone (6} 007.59.31 

P.S.I. BENELUX 

5, avanue de la Ferme Rose 

1180 Bruxelles 

BELGIQUE 

Téléphone (2) 345.08.50 


en Suisse 
16. avenue de Beaumont 


1700 Fribourg 
Tél. : (037) 24.43 76 


Envoyer ce bon 
accompagné 

de votre réglement à 
P.S.I. DIFFUSION 

ou, pour la Belgique et 
le Luxembourg, à 


N° 


P.S.I.BENELUX 

NOM mn PAENOM __— 
rue 

Code post. LL. 1 1 1) Ville 


OPPO 4 


DES LIVRES 
POUR VOTRE 


SINCLAIR ZX81] 


1. BARIC APPROFONDL 
INITIATION AU 
LANGAGE MACHINE. 


P.S.I. DIFFUSION 

41-51, rue Jacquard Envoyer ce bon 

BP 66 - 77402 Lagny-s/Mame Cedex accompagné 

FRANCE de votre règlement à 

Téléphone (6) 007.59.31 P.S.I. DIFFUSION 

ou, pour la Belgique et 

P.S.I. BENELUX le Luxembourg, à 

5, avenue de la Ferme Rose P.S.1 BENELUX 

1180 Bruxelles {par avion : ajouter 8 FF (75 FB) par livre) 

BELGIQUE 

Téléphone (2) 345. NOM PRENOM 
au Canada En Sulsse 
SCE Inc. En Espagne CRISPA w 
3449 rue Saini-Denis P.S.I. IBERICA 18, avenue de Beaumont De — Roi 
Montréal Québec H 2X3 L1 Ferraz 11 Madrid 8 1700 Fribourg 


Tél. : (514) 843,76.63 Tél. : (11 247.30.00 Tél. : (037) 24.43.78 Code post. LL LL; Ville 


LOG K7 DE PROGRAMMES POUR 
/ sx / CASIO PB-100,FX-702P 


LE N°1 DU LOGICIEL DE POCHE : TEL (1) 340.38.36 


HP 41CV 


SHARP PC 1211 
Imprimante interface CE 122 
SHARP PC 1500 
Imprimante graphique 


EXPÉDITION SANS FRAIS 


2390 F ttc 
1040 F tte 

780F ttc 
490 Fttc 


ENVOYEZ COMMANDE ET RÈGLEMENT A 


SRB 
220, rue Marcadet - 75018 Paris - Tél. 226.13.00 
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Cette augmentation de mémoire 
permet à ce pocket des program- 
mes plus musclés. 


* Entièrement compatible avec 
l'imprimante et l'interface K 7. 


*_ Extension intégrée dans le boîtier. 
Modif. physique par nos soins 
exclusivement. 


* Garantie 1 an. Reprise des 
garanties en cours. 


DETAILS COMPLEMENTAIRES 
APPORTES PAR LA MODIF. 
possibilités fichiers nettement améliorées, 
overlays plus importants. 

traitements optimisés beaucoup plus 
rapides 

utilisation possible de 2 magnétophones 
simultanés sans modification complé- 
mentaire. 
alimentation : 
batterie auto. 
affichage et impression programmable 
(réglage du contraste). 

manuel d'utilisation en français, largement 
documenté. 

systèmes d’entrées/sorties universels : 
connection vidéo, modem, carte secteur 
et mini synthétiseur 

retour de votre PC 1211 en Rec par 
nos soins. 


piles / secteur / accus ou 


9, rue de Lalande . | - 
33000 BORDEAUX Tél. (56) 91.55.08 : te 7 ‘adresse 
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Etudiants, lycéens lisez 


LORDINAIE 
 LECOLE 


Lycéens, étudiants, enseignants, parents : l’équipe de la revue 
L'ORDINATEUR INDIVIDUEL publie un numéro spécial 
hors-série qui fait le point sur Pordinateur à l’école. 

e Un ordinateur dans une classe ? 

« Comment l’enseignement peut-il être facilité par un 
ordinateur individuel ? 

À partir de quel âge peut-on découvrir l’informatique ? 

- Quelle aide un ordinateur familial apporte-t-il sur le plan 
éducatif? 

. Comment créer et gérer un club d'informatique individuelle 
dans un établissement scolaire ou universitaire ? 

Toutes les réponses à ces questions (et à d’autres!) figurent 
dans ce dossier indispensable réalisé à partir d’une synthèse 
des meilleurs articles parus dans 
L'ORDINATEUR INDIVIDUEL. 

En 1983, il n’est plus raisonnable d'ignorer le formidable outil 
qu'est ordinateur. Pour être mieux informé sur ce domaine, 
lisez L'ORDINATEUR ET L'ÉCOLE. 


DECISION INFORMATIQUE 


LE JOURNAL 


A USAGE PROFESSIONNEL 


j 


in 


DECISION INFORMATIQUE: 
UN LUNDI SUR DEUX, TOUTE L ACTUALITE 
DE LA MICRO- INFORMATIQUE. 


DÉCISION INFORMATIQUE 
LE MICRO-ORDINATEUR 
DANS VOTRE VIE 
PROFESSIONNELLE 


1976 : Plusieurs annonces fracas- 
santes ébranlent le monde de l'infor- 
matique traditionnelle et sonnent l’avè- 
nement des micro-ordinateurs. Tirant 
parti de l'accélération technologique, 
divers constructeurs mettent, enfin, 
l'énergie informatique à la disposition 
du plus grand nombre. 


Six années déjà se sont écoulées et les 
“micros” se sont étoffés au point de 
concurrencer les plus petits des 
ordinateurs classiques. Performances 
élargies, fiabilité accrue et, surtout, 
multiplication des programmes d'ap- 
plications professionnelles : il n'est 
plus d'activité qui ne puisse bénéficier 
de l'accroissement immédiat d'effica- 
cité personnelle que confère l'usage 
d'un micro-ordinateur. 


D'innombrables programmes de mani- 
pulation de fichiers, de traitement de 
texte, de planification, d'aide à la 
décision, de calcul scientifique et tech- 
nique, de communication avec des 
banques de données, etc. sont ainsi 
apparus, caractérisés par leur adapta- 
tion aux problèmes de l'utilisateur non 


DÉCISION INFORMATIQUE 
UN LUNDI SUR DEUX : 
QUEL MICRO-ORDINATEUR ? 
QUELS PROGRAMMES ? 


Le coût moyen d'un micro-ordinateur 
destiné à un usage professionnel est 
compris entre 10000 et 70000 FF. 
Dans cette gamme de prix, près de 
200 machines sont offertes actuelle- 
ment à l'envie des utilisateurs français, 
accompagnées d'un bon millier de pro- 
grammes d'applications. Confronté à 
une telle abondance, l'utilisateur 
désemparé s'interroge : comment 
choisir un premier micro ? Quels logi- 
ciels lui associer pour en tirer le meill- 
leur parti? Quel crédit accorder aux 
affirmations des vendeurs ? 


Soustitré “L'actualité sur les micro- 
ordinateurs et leurs programmes”, 
Décision Informatique rend d'abord 
compte de tous les événements de la 
quinzaine : les nouveautés apparues, 
les expositions, les évolutions de prix, 
les nouvelles des réseaux de distribu- 
tion, etc, Mais Décision Informatique 
est aussi le conseiller le plus avisé à 
l'heure des choix : bancs d'essai et 
panoramas comparatifs de produits 
abondent dans ses colonnes, complé- 
tés par des exemples concrets de réali- 


sations et des témoignages d'utilisa- 
teurs. 


Tout cela, évidemment, en un langage 
parfaitement accessible au respon- 
sable désireux de mettre un micro à 
son service. 


DÉCISION INFORMATIQUE 
195 FF POUR 21 NUMEROS : 
UN BON INVESTISSEMENT 
POUR VOTRE AVENIR 


Aujourd'hui, l'efficacité personnelle 
d'un responsable passe par une hiérar- 
chie impitoyable de son emploi du 
temps : il n'est plus possible, simulta- 
nément, d'assumer pleinement des 
responsabilités et d'accomplir des 
tâches qu’une machine peut exécuter. 
Et à l'heure d'une compétition écono- 
mique plus sauvage que jamais, il 
serait périlleux de se priver des plus 
récents bienfaits de la technologie. 


Cadres d'entreprises, dirigeants de 
PME/PMI, professions libérales, ingé- 
nieurs, etc, sont ainsi prêts à exploiter 
un outil dont ils n’ont à connaître ni la 
technique, ni la programmation. 
Pour les rejoindre, le premier pas 
s'appelle Décision Informatique et ne 
coûte que 195 FF. 


spécialiste. 


DECISION 


INFORMATIQUE 


| dans por rat endend 
D enen.pd 


À RO 66 PO 1 LUCE 


Je souscris un abonnement d'un an {21 N°) à Décision Informatique au prix de : 

195 FF (TVA 4 % incluse) pour la France, 1700 FB pour la Belgique, 80 FS pour la Suisse, 

240 FF pour l'étranger {étudiants 150 FF France) 

M. MME MLLE eu ueuueuersueuese eu uéuuueseseeseresesesesseeerererseeeeree 
PROFESSION. sueur sseserreseresereererssreresreeer 
ADRESSE {Personnelle 1 Professionnelle D) ...........................,.........22. 
D je joins mon règlement CG je paierai à réception de facture 


| Bulletin à retourner 
Décision Informatique : 5, Place du Colonel Fabien 75491 PARIS Cedex 10 


A vos claviers 


L'ORDINATEUR DE POCHE 
39 rue de la Grange aux Belles 
75484 PARIS CEDEX 10 


Sharp(s) : 
All Reset ? 


Sur tous les poquettes PC- 
1500, 1251, 1212 et 1211, ilest 
possible de conserver les 
mémoires programme et 
réserve même lorsqu'il s'avère 
nécessaire de provoquer un 
AH Reset. Sur le PC-1500, il 
suffit de ne pas presser la 
touche ON en faisant l°4/ 
Reset et, ensuite, de refuser 
le “NEW 0: CHECK ?” par 
CL. Rappelons que sur le PC- 
1251, à l'inverse, il faut 
accompagner A/ Reset d'une 
pression continue d’une tou- 
che quelconque. En revan- 
che, cette touche doit être la 
touche OFF pour le PC-1212 
et, enfin, soit OFF soit ON sur 
le PC-1211 ceci variant en 
fonction du modèle dont vous 
disposez. 


Jean-Pierre Picard 
Paris 8° 


Que dit la PC 100 ? 


Venant d'entrer dans l'uni- 
vers de la petite informatique 
il y a quelques mois, j'ai 
trouvé dans un de vos pro- 
grammes de jeu pour TI 58, 
58 C et 59 la fonction 
« EQ ». Et j'ai beau chercher, 
je ne trouve pas la touche 
correspondante sur ma 
TI 58 C. De quoi s'agit-il en 
fait ? 

Laurent Leciaire 
54 Nancy 


Au début, j'ai suivi votre 
revue avec ma Tl 57, Depuis 
peu, j'ai pu m'offrir une 
TI 58 C, et je ne parviens pas 
à déchiffrer les programmes 
que vous avez publiés pour 
ma nouvelle machine. 
J'aimerais savoir s'il existe un 
petit carnet qui contiendrait 
ces fonctions étranges (SMx, 
GE, RTN, etc.}). Pouvez-vous 
également me dire s’il existe 
une instruction qui permet de 
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des valeurs au vol 
le fait en 
remercie 


saisir 
comme INKEYS 


Basic. Je vous 
d'avance. 


Olivier Schettino 
Marseille 8° 


M Vos déboires proviennent 
du fait que l'imprimante des 
7158 et 59, la PC 100, ne 
liste pas {es programmes en 
utilisant pour toutes les fonc- 
tions préprogrammées les 
mêmes appellations que cel- 
les qui sont gravées sur les 
touches des calculatrices. 
C'est ainsi que la séquence 
2nd Prd 2nd ind, dont le 
code est 64 aussi bien sur les 
71 58/59 que sur la PC 100, 
est listée par cette dernière 
PD*, Nous en avons déjà 
parlé dans le n°4 de l'Op. 
Maïs i! n'est sans doute pas 
inutile de rappeler le tableau 
d'équivalence TI 58/59 et 
PC 100 pour fa douzaine 
d'instructions qui prétent le 
plus souvent à confusion. Le 
voici donc. 


mA Code Séquences 
PC 100 num de touches 
LNX 23 2nd Inx 
PAU 66 2nd Pause 
EQ 67 2ndx=t 
GE 77 2ndx>t 
STF 86 2nd St flg 
IFF 87 2nd lf fig 
LST 90 2nd List 
RTN 92 INV SBR 
PD+ 64 {2nd Prd 2nd Ind 
ST*+ 72 STO 2nd Ind 
RC+ 73 RCL 2nd Ind 
SM» 74 SUM 2nd Ind 


Chacun pourra vérifier que 


le code numérique d'une ins- 
truction, quelle qu'elle soit, 
est le même sur la calcufa- 
trice et sur son imprimante. 
On remarguera d'autre part 
que l'astérisque dans une 
fiste sortie de la PC 100 rem- 
place la séquence 2nd Ina. 

Dernière question : existe- 
t-4 sur {a Ti 58 C une instruc- 
tion équivalente à la fonction 
INKEYS$ du Basic ? De toute 
évidence non. Et il y a peu 
de chances pour que 
quelqu'un ait réussi à prou- 
ver le contraire... 


I ne veut rien 
entendre ! 


Mon Casio FX-702 P 
boude systématiquement 
tous les programmes écrits 
pourtant de sa « main » sur 
cassette. L'interface FA-2 est 
en parfait état. À la lecture 
d'un programme, le magné- 
tophone diffuse une petite 
musique correspondant à 
l'enregistrement. Non seule- 
ment rien n'est recopié, mais 
en outre il ne s'arrête même 
plus. Je dispose pourtant 
d'une télécommande. J'ai 
tout essayé, relu, mais rien 
n'y fait ! 

Christophe Marteau 
61 Mortagne 


ME£t un autre magnéto- 
phone ? H est, en effet anor- 
mal — et tout à fait sympto- 
matique — que le vôtre dif- 
fuse la petite « musique » du 
programme à qui veut 
l'entendre hormis votre 702. 
L'enregistrement doit lui être 
transmis en exclusivité par la 
prise d'écouteur externe et 
non par le haut parleur du 
magnétophone. 

Conclusion, celui-ci ne 
détecte pas /a présence de la 
fiche mêle noire de l'inter- 
face. Vos deux appareils 
s'ignorant mutuellement, 
comment pourraient-ils 


s'entendre ? Vérifiez donc 
l'état des fiches mâles de 
l'interface (propreté...) et des 
prises femelles du magnéto- 
phone (soudures.….}. 


Toujours 
la même différence 


Sur mon poquette, j'ai fait 
un petit programme à partir 
de la curiosité arithmétique 
suivante : 

1. On prend un nombre de 
trois chiffres différents les uns 
des autres. 

2. On écrit le nombre com- 
posé de ces trois chiffres ran- 
gés par ordre décroissant. 

3. On écrit le nombre com- 
posé des mêmes trois chiffres 
rangés par ordre croissant. 

4, On fait la différence de ces 
deux nombres. 

5. Avec le résultat obtenu, on 
recommence le processus à 
partir de l'étape 2. 

Tôt ou tard, on retrouve 
toujours la même différence : 


Appliqué à un nombre de 
quatre chiffres, la même pro- 
cédure conduit toujours à 
6174, Pour les nombres de 
cinq chiffres en revanche, 
cela paraît ne pas marcher. Je 
serais heureux si quelqu'un 
pouvait trouver une démons- 
tration à cette curiosité. 


André Brousseau 
11 Limoux 


B S'/'un de nos lecteurs veut 
bien nous communiquer cette 
démonstration, nous vous fa 
transmettrons bien volon- 
tiers. 
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La catalepsie 
synthétique 
de la HP-41 


J'ai été agréablement sur- 
pris de découvrir la program- 
mation synthétique dans /’Op 
n° 10 (Grandes factorielles, p. 
68 et 69). D'autres surprises 
m'attendaient d’ailleurs lors- 
que, négligeant l'avertisse- 
ment « ne quittez pas le sen- 
tier ici battu pour vous », j'ai 
réalisé en m'aventurant quel- 
ques découvertes : à plu- 
sieurs reprises, à la suite de 
manœuvres inconsidérées, 
j'ai pu constater que j'avais 
plongé ma HP dans un état 
comateux. À l'intention des 
autres lecteurs novices en 
« synthétisme », je vous 
signale comment j'ai réveillé 
ma machine : ôter les piles ou 
les accus pendant quelques 
secondes puis, tout en main- 
tenant la touche <— pres- 
sée, les remettre en place. Si 
la HP donne alors signe de 
vie, provoquer un MEMORY 
LOST. 

Ce remède n'est pas tou- 
jours efficace. Parfois, en 
désespoir de cause, il a fallu 
que je prive ma machine de 
toute alimentation électrique 
pendant 24 heures ! 


Thierry Mouton 
Paris 8 


Des « GTO » bizarres 
sur la TI 57 


M'étant inspiré du pro- 
gramme « Testez vos 
réflexes » paru dans le pre- 
mier n° de l'Op (page 18), 
j'avais été contraint de rem- 
placer le RST de la fin par un 
GTO 3: la mémoire pro- 
gramme de ma TI 57 était en 
partie occupée, et en plaçant 
une étiquette Lbi 3 à la fin de 
la place utilisée j'obtenais ce 
que je voulais. Cela fonction- 
nait parfaitement. Puis j'ai 
voulu pousser plus loin en 
essayant (on ne sait jamais} 
de séparer le GTO du 3: 
GTO SST 3 Et là —6 
surprise — au lieu de repartir 
à l'étiquette 3, le programme 
retournait de trois pas en 
arrière et, comme on dit, 
« bouclait » sur lui-même. 

En remplaçant GTO SST 3 


À vos claviers 


par GTO SST 4, j'avais un 
programme qui repartait qua- 
tre pas en arrière, En fait le 
même phénomène se produit 
pour GTO SST1 à GTO 
SST 9 inclus. J'espère que 
ces petits «trucs » vous 
seront bien utiles et je sou- 
haite longue vie à l'Op et à 
toute son équipe ! 


Rémi Le Révérend 
58 Hondschoote 


BE Ce que vous avez remar- 
qué intéressera certainement 
beaucoup d'utilisateurs de la 
TH 57. Parions qu's sauront 
tirer parti de ce curieux pro- 
cédé de branchement à 
l'intérieur du programme. 
Quant à nous, nous l'avons 
rapidement testé, et À nous 
semble bien que ce que vous 
avez observé est plus éton- 
nant que vous ne le pensez. 

Avec le programme de 
réflexes qui vous a servi de 
point de départ, il était natu- 
rel que vous en arriviez à le 
conclusion que le programme 
revenait en arrière du nombre 
de pes {compris entre 1 et 9] 
inscrit après le GTO. La 
séquence intéressée devait 
être 87654321 CLR GTO SST 
3 fou 4, ou 5, etc.}, ou quet- 
que chose de similaire. 

Les quelques petits essais 
que nous avons faits nous 
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laissent penser qu'en réalité | 


le pointeur recherche dans la 
liste du programme 2 pre- 
mière apparition du chiffre 
inscrit après le GTO SST fil 
peut d'ailleurs s'agir d'un 
zéro}, et qu'i vient S'y posi- 
tionner exactement comme fl 
le ferait s'il s'agissait d'une 
étiquette. Si la liste ne con- 
tient pas ce chiffre, l'affi- 
chage devient clignotant. 
Encore une idée à creuser. 


<< 
La simplicité même 


Voici un programme très 
court qui peut intéresser cer- 
tains lecteurs de l'Op. Il per- 
met de connaître tous les 
chiffres du quotient d’une 
division, et il a été écrit pour 
un Casio FX-702 P. Le voici, 
en six lignes de Basic. 


18 [KP °A=", A 
28 INF °E=”, 

38 B=INT (A/B) 
40 A=(A-BAG 18 
50 PRT Q: 

66 6070 39 


Chacun pourra l'adapter 
facilement à son ordinateur 
de poche. Amicalement, 


Jean-Marc Duhen 
33 Talence 


Des étiquettes 
démesurément 
longues... 


Salut à toute l'équipe des 
« opistes » | 

Utilisant depuis peu (et 
pour cause) un PC-1251, je 
vous signale une possibilité 
mal connue du nouveau 
poquette de Sharp. 

Cela n'est pas dit dans la 
notice et cela concerne l'éti- 
quetage des programmes. 
On pouvait s'attendre à dis- 
poser d'étiquettes alphanu- 
mériques comptant jusqu'à 
sept caractères comme sur le 
PC-1211. En fait, on peut uti- 
liser des étiquettes plus lon- 
gues. J'ai essayé avec 16 et 
24 caractères... et Ça mar- 
che ! Si vous êtes sceptique, 


essayez ce court pro- 

gramme : 

tetA"s LOIAR : JIT Bs« 
Dæ24t INOUT LC LAB 
EL ?*:85c@:: GOTO R$ 
1#) 

RE YAUENTYUIQOASIFGHIKL 
s2xuv*: SPRINT * qu 
ERTY": ENT 


S:VASDFGHIKL22KCVBN*: 
PRINT * ASDEGHIKL? 


 2NJ 


En mode RUN, tapez 
DEF À et inscrivez l’un des 
deux labels « QWERTYUIO- 
PASDFGHIJKL=ZXCV » ou 
«€ ASDFGHUKL=ZXCVBN ». 
Vous constaterez que la 
machine s'y retrouve. Je n'ai 
pas essayé avec plus de 24 
caractères, mais je suppose 
que l’on doit pouvoir aller 
jusqu'à 80... Et puis de tou- 
tes les façons, 24 caractères, 
ce n'est déjà pas mal... 

Notez que l'on peut aussi 
demander l'exécution d'un 
programme à partir d’une de 
ces étiquettes en demandant 
par exemple RUN « QWE 
RTYUIOPASDFGH 
JKL = ZXCV» ou GOTO 
« QAWERTYUIOPASDFGH 
JKL = ZXCV ». 

Amicalement 


Yves-Louis Gueguen 
Marseille 2° 


M Ou, 24 caractères pour 
indiquer où doit s'effectuer 
un branchement à l'intérieur 
d'un programme, c'est déja 
beaucoup. C'est même beau- 
coup plus qu'i n'en faudra 
dans l'immense majorité des 
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cas. Et vous ne vous trompez 
pas lorsque vous supposez 
que le PC-1251 est capable 
d'aller plus loin. Voici un 
autre petit programme qui 
met en œuvre des étiquettes 
elphanumérigues de 75 
caractères {du pur luxe 1). 


19:71m ESCD)4x8û 
293BEEP 1 PAUSE OL AL 
LER 7" 


39:INPUT 3#(D) 

49:G0T0 B$(B) 

S'EMLLELLEEL LES 

GOIPAINT 19 TO: ES*: 
GOTC 24 

79: "ABCHEFGH I IKLMNIPORS 

k TUVAuxYZ"* 

34: ORIrIT YLAALPUAOBET*: 
GTO 23 

CUEMELL LE LELE LEE EEE LE LE 
he 4 6 HE DEEE HE OO 
Ce NE DE 2 2 EDEN ON 
ÉCS TE CELL ELET SE 

1A9:pRINT “75 ETOILES... 
“+: GOTQ 28 


En réalité, # est probable 
que l’on puisse faire un peu 
mieux : 76 caractères. Au- 
delà, i! devient impossible de 
fager l'étiquette sur une seule 
ligne. On doit en effet comp- 
ter deux octets pour Je 
numéro de la ligne, un octet 
pour fes premiers guillemets 
et un octet enfin, correspon- 
dant à la pression sur la tou- 
che ENTER qui valide !a 
ligne, soit quatre octets au 
total, Et comme une ligne ne 
peut comporter que 
& octets. 

Cela étant dit, on ne voit 
pas quelles raisons pour- 
raient justifier un te! gaspif- 
lage de la mémoire vive. 


Les lecteurs nous 
communiquent 
leurs trouvailles 


Sur mon FX 702P, j'ai eu 
l'occasion d'utiliser récem- 
ment un programme de tri 
alphabétique (méthode de 
Shell) et il m'est venu l'idée 
d'entrer de simples caractè- 


res (lettres, chiffres, 
signes...) plutôt que des 
mots. 


A ma grande surprise, non 
seulement la machine n’a pas 
affiché de message d'erreur 
mais elle m'a sorti Son « clas- 
sement personnel » que je 
vous transmets : SPC ? » # 
$::,>2=<<2+ -— x 
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À vos claviers 


/11310123456789,n7 
EABC D {etc.} X Y Z. 
Jusqu'à présent, je ne vois 
pas quelles applications prati- 
ques pourraient découter de 
ce classement, mais j'ai 
pensé qu'il était intéressant 
d'en faire part à vos lecteurs 
qui utilisent un 702 P. 
Longue vie à /’Op! 


JU 


La main 
de l'ordinateur 


Une expression m'a rendu 
perplexe dans l'un des arti- 
cles du « Pot Commun » de 
f’Op n° 4 (page 62) ; on peut 
lire en effet que « la machine 
rend la main ». N'étant pas 
informaticien, je n'ai rien 
compris. Ne pourriez-vous 
pas faire un effort pour que 
les textes que vous publiez 
soient lisibles même pour des 
non-initiés ? 


C Un lecteur 


D Votre remarque est très 
judicieuse. Sur la question 
précise de cette « main » gue 
fa machine rendrait, voici les 
éclaircissements désirés : 
lorsqu'un ordinateur est en 
train d'exécuter un pro- 
gramme, la plupart des tou- 
ches de son clavier sont ino- 
pérantes. L'utilisateur peut 
cependant l'arrêter de plu- 
sieurs façons. fl peut d'abord 
appuyer sur une touche qui 
suspend l'exécution pro- 
gramme (A/S, BREAK ou 
STOP généralement}, Dans 
ce cas, le programme 5e 
poursuivra dès que l'on aura 
donné à la machine l'ordre 
adéquat: nouvelle pression 
sur la touche R/S où CONT 
{pour « CONTinue »}. L'exé- 
cution du programme, alors, 
a seulement été interrompue 
momentanément. 

Sur certains modèles, on 
peut également éteindre a 
machine, mais cela ne vaut 
pas pour tous les matériels. H 
arrive en effet qu'un pro- 
gramme en cours d'exécu- 
tion neutralise aussi l'inter- 
rupteur de mise hors ten- 
sion : On à beau appuyer sur 
fa touche « OFF », l'ordina- 


teur continue à fonc- 
tionner… 

Reste alors deux autres 
façons plus radicales d'inter- 
rompre le travail de la 
machine : couper l'alimenta- 
tion électrique {on retire les 
piles, on débranche la prise) 
ou appuyer sur le bouton AI 
Reset, c'est-à-dire « remise à 


zéro », si toutefois un tel 
bouton existe. 
Cela étant dit un pro- 


gramme correctement conçu 
doit s'arrêter tôt ou tard de 
lui-même pour afficher ou 
imprimer par exemple le 
résultat des calculs effectués. 
H se met alors en attente de 
nouvelles instructions venant 
de l'utilisateur. On dit alors 
qu'i rend la main : /'utilisa- 
teur peut de nouveau se ser- 
vir du clavier pour indiquer 
ce qu'À veut, c'est à lui de 
jouer. En Basic, cette situa- 
tion se traduit généralement 
par l'affichage d'un signe [dit 
« d'invite »}, le plus sauvent 
> ; mais on trouve aussi par- 
fois « O.K. ». 

Espérons que ces quelques 
explications ne vous seront 
pas plus obscures encore 
que l'expression qui vous 
rendait perplexe... 

En ce qui concerne le pro- 
blème que pose générale- 
ment le jargon de l'informati- 
que, notre attitude est sim- 
ple : nous nous ‘efforçons 
d'éliminer ce jargon {avec un 
soin particulier lorsqu'il s'agit 
de mots anglais), mais quand 
nous ne trouvons pas les ter- 
mes clairs et « bien de chez 
nous » qui pourraient CONVvE- 
nir, comment faire ? La meilt- 
leure solution consiste sans 


doute à définir Ja signification 
du terme barbare {peek, 
poke, etc.]). 

Hélas, comme tout jargon 
{pour ceux qui le connaissent 
bien sûr!, il est très pratique, 
trop pratique même, et il 
nous arrive de temps à autre 
d'y avoir recours sans nous 
rendre bien compte de ce 
qu'il peut avoir d’hermétique. 
Vous faites bien de nous rap- 
peler ce travers. 

Certains de nos lecteurs 
ont-ils des idées de termino- 
log'e qui permettraient de 
décrire l'univers de l'informa- 
tique à l'aide d'un vocabu- 
laire qui soit parlant, même 
pour les néophytes ? Nous 
attendons leurs suggestions : 
chacun à intérêt à ce que le 
lexique de l'informatique (de 
poche ou non) ne constitue 
pas un obstacle à l'initiation. 
Nous sommes les premiers à 
reconnaître qu'il y a beau- 
coup à faire dans ce sens-là : 
c'est un travail très difficile, 
et de longue haleine. 


Philosophe ? 


Chers amis, le ZX 81 serait- 
it donc aussi philosophe ? 
Jugez-en : pour lui, un nom- 
bre n’est pas toujours ce qu'il 
paraît être... ÆCherchant à 
obtenir un nombre de quatre 
chiffres dont deux sont déci- 
maux, j'ai programmé l'addi- 
tion d'un entier de deux chif- 
fres auquel le programme 
ajoute deux décimales qui 
sont obtenues par la 
séquence INT (RND » 
100}/100. L'ordinateur affiche 
bien un nombre de quatre 
chiffres xx, xx dont deux sont 
décimaux, mais ce nombre 
n'est pas toujours égal (selon 
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le ZX) au même nombre xx, 
xx entré au clavier. Je com- 
mence à douter de la fonction 
INT et j'y perds mon latin. 
ainsi que mon Basic. 


Jean-Luc Delangie 
61 Damigny 


BR Effectivement, si la varia- 
ble À contient le nombre xx, 
xx ainsi qu'il a été calculé, le 
test PRINT À = xx, xx peut 
s'avérer négatif : affichage de 
0, autrement dit l'égalité n'est 
pas vérifiée. Cela est d'autant 
plus troublant que PRINT A 
affiche bien xx, xx. 

À y regarder de plus près, 
tout semble indiquer que c'est 
là division par 100, et non !a 
fonction INT, qui est en 
cause. Essayez PRINT 
8815/100 et vous verrez s'‘affi- 


A vos claviers 


cher 88.15, mais testez PRINT 
8815/100 = 88.15 et le ZX 
vous répondra « faux ». 
Dernandez-lui maintenant en 
quoi cela est faux: PRINT 
18815/ 100) — 88.15, et vous 
obtiendrez à l'écran 
— 2.9802322 E —8. Dans cet 
exemple précis, le résultat de 
18 division est donc exact à 
99,99999997 % près. L'erreur 
est trop petite pour être visua- 
lisée (xx.xx est bien affiché) 
mais elle n'est pas assez 
petite cependant pour être 
ignorée dans la mémoire du 
ZX, d'où le résultat du test. 
Voilà pour ce qui touche au 
Basic. Quant au latin. CI 


Et puis un jour. 


Chacun à sa façon, chacun à son niveau, 
vous êtes des dizaines de milliers 
à avoir découvert l'informatique de poche. 
Ecrivez-nous, racontez-nous comment 

vous avez abordé ce domaine 
et en quoi votre expérience est originale. 

Vous nous aiderez à décrire 

les multiples facettes 
de linformatique de poche. 


M En fait, ce sont deux traits 
de caractère qui m'ont con- 
duit à adopter l'informatique 
de poche : je suis un homme 
paresseux, d'une part, et je 
veux « tout, tout de suite ». 

Si j'ai toujours eu une très 
mauvaise note en calcul, ce 
n'est pas parce que je ne 
savais pas faire les opéra- 
tions, mais parce qu'une fois 
que je les avais apprises, 
elles ne m'intéressaient plus. 
Je les trouvais fastidieuses et 
je révais d’une machine qui 
m'aurait donné la réponse 
aussitôt l'opération posée. 
Parfois même, j'imaginais 
que le premier de ma classe 
en calcul était justement 
« ma » machine à calculer. 

Plus tard, j'ai découvert la 
règle à calcul : elle est deve- 
nue ma machine à multiplier, 
à diviser, à extraire les raci- 
nes et à élever les nombres 
aux puissances. Elle ne don- 
nait que quelques chiffres 
significatifs, mais c'était telle- 


ment facile et rapide ! || me 
restait tout de même à trou- 
ver un autre procédé qui 
aurait fait les additions et les 
soustractions aussi simple- 
ment. 

Longtemps, je suis resté 
sur ma soif. || existait bien 
sûr les machines électromé- 
caniques et les calculatrices 
électroniques « quatre opéra- 
tions », mais la plus modeste 
d'entre elles aurait coûté plu- 
sieurs mois de mon salaire. 

Et puis un jour est apparue 
la calculatrice scientifique : 
adieu Bouvart et Ratinet, 
adieu les tables de logarith- 
mes et de trigonométrie, je 
me suis offert une Commo- 
dore SR 36. Tout était sur le 
clavier : les quatre opéra- 
tions, la table de logarith- 
mes, les lignes trigonométri- 
ques, les fonctions exponen- 
tielles, le nombre pi avec dix 
chiffres significatifs... j'étais 
comblé. 

Cela ne m'empêchait pour- 
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tant pas de continuer à rêver. 
A l'époque, j'utilisais au 
bureau une Olivetti Pro- 
gramma 101. Grosse comme 
quatre machines à écrire, elle 
faisait autant de bruit que 
huit, mais elle effectuait les 
calculs automatiquement 
grâce à ses 48 pas de pro- 
gramme. Avoir une calcula- 
trice, c'était bien, mais ne 
plus devoir noter les résultats 
intermédiaires pour les réin- 
troduire au clavier, c'était un 
net progrès. 


Oui, ce à quoi je rêvais, 
c'était bien au calcul automa- 
tique : te moins possible de 
manipulations au clavier pour 
un maximum d'efficacité 
dans les calculs. C'est pour- 


programmes que j'avais 
écrits pour la T1 59 soient tra- 
duits en Basic. Ce langage 
me convenait parfaitement, 
Ce que j'apprécie le plus 
dans l'informatique, c'est 
qu'elle me fournit un outil qui 
me dispense des calculs fas- 
tidieux, un outil qui me per- 
met d'obtenir les résultats 
que je désire grâce à des 
ordres aussi voisins que pos- 
sible de ceux du langage 
naturel. L'informatique de 
poche présente en outre 
l'avantage d’une disponibilité 
immédiate et permanente. 
Tout cela, je l'ai eu avec le 
PC-1211. Comme on s'en 
doute, je me suis jeté sur 
l'imprimante dès sa sortie (eh 
oui ! j'ai toujours été pressé), 
mais j'aurais bien aimé avoir 
le magnétophone dans le 
même étui, car j'ai horreur 
des branchements, horreur 
des fils qui traînent (pour la 


quoi, dès que la TI 59 est 
apparue, je l'ai achetée. 
Entre temps, la Programma 
101 de mon bureau avait été 
remplacée par la Wang 700 : 
960 pas de programme, 120 
registres de mémoire, toutes 
les fonctions exponentielles 
et trigonamétriques sur cas- 
sette... 

Ma TI 59 avait presque la 
même puissance que la 
Wang 700 pour un prix trente 
fois moindre, le tout dans un 
volume trois cents fois plus 
petit ! Ma machine me ren- 
dait les mêmes services et je 
n'avais plus à attendre mon 
tour devant la W-700 (mes 
collègues sont nombreux) : 
j'avais tout, tout de suite. 

Pendant plus de deux ans, 
je suis resté fidèle à ia TI 59, 
puis j'ai appris dans L'Ordi- 
nateur Individuel que l'on 
parlait d'une machine de 
poche programmable en 
Basic, langage proche du 
Fortran qui était très connu à 
l’époque. Une facilité supplé- 
mentaire s'offrait à moi: 
adieu les manipulations des 
registres de mémoire, la ges- 
tion des drapeaux, les adres- 
sages directs et indirects. Je 
crois bien avoir été l’un des 
premiers à me procurer un 
PC-1211, et il n’a pas fallu 
longtemps avant que tous les 


petite histoire, j'ai fait la plus 
mauvaise chute de ma vie en 
sautant à la corde). De ce 
point de vue, un ordinateur 
comme le PC-1251 et les 
machines similaires qui appa- 
raîtront sans doute me 
paraissent excellents. Mais 
celui qui a la chance d'avoir 
toujours ce qu'il souhaite — 
et c'est mon cas — a ten- 
dance à en souhaiter trop. 

A souhaiter une machine 
dont la mémoire me permet- 
trait d’avoir tous mes pro- 
grammes usuels sous la main 
sans que j'aie à les recher- 
cher sur une cassette {mani- 
puler une cassette, c'est per- 
dre du temps et il me faut 
« tout, tout de suite »...) : à 
souhaiter une machine avec 
de grosses touches {avec 
l'âge, ma vue baisse et il me 
faut trouver les touches rapi- 
dement}, j'ai fini par me pro- 
curer un ordinateur qui n'est 
pas tout à fait de poche : un 
Epson HX-20. Il est cepen- 
dant autonome et je peux 
l'emporter où je veux. 

D'ici peu, je pense qu'il 
existera une machine de 
puissance équivalente (ou 
supérieure !} qui se glissera 
dans la poche de mon ves- 
ton. Et je l’achèterai sans 
perdre une minute... 


[D PKT 
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HE UN LIVRE 

Mathématique 

et calculatrice 

programmable 

au lycée et au Bac 

Bernard Cornu 

et Claudine Robert 

Editions Magnard 
Paris, 1983 

Broché, 208 pages 

Prix : 62 FF; 

B Voici un livre qui est 
principalement destiné aux 
utilisateurs de la Ti-57 
LCD dont une photo orne 
d'ailleurs la page de couver- 
ture. 

Dans la première partie, 
on trouvera une bonne ini- 
tiation à l’utilisation de 
cette machine et, à travers 
elle, à l’utilisation d’autres 
calculatrices programma- 
bles. Chaque chapitre 
aborde un point précis de la 
programmation illustré par 
de multiples exemples. Les 
exercices d’application 
— eux aussi très nom- 
breux — sont astucieuse- 
ment présentés : l’énoncé 
sur la page de droite, et un 
exemple de solution ou des 
commentaires sur la page 
de gauche. Cette partie 

occupe les quatre-vingts 
premières pages. 


On aborde ensuite certai- 
des notions étudiées 
dans les classes de seconde, 
de première ou de termi- 
nale. Pour l'analyse de cer- 
les 
auteurs utilisent une nota- 
tion algorithmique formelle 
qui est très intéressante : 
inspirée par les théories de 
la programmation structu- 
rée, cette notation met en 
œuvre un vocabulaire de 
base élémentaire et, ce qui 
ne gâte rien, français. Les 
différents algorithmes de 
départ sont alors adaptés 


nes 


tains programmes, 


dans ces chapitres les algo- 
rithmes de base de l’arith- 
une étude des 


métique, 
nombres réels, des suites, 
des séries, des fonctions, 
ainsi que la résolution 
d'équations, l’approxima- 
tion d’une fonction et les 
rudiments des calculs de 


qui nous ont re 
nous avons tiré à 


ordinateur qu 


ment à vie es 
Vabonné. 


plus tard possible. 


au langage de la TI-57 
LCD. 
On trouvera également 


ï hose due. LE / 
ae PE né le questionnaire Lecte 


u sort le nom 


abonnement gratuit à vie 
Le nombre de vos répon: 
voit) qu'il nous était matéri 


Li it fal £ 
See A confié le rôle de 


j élevé : ti 
nses a été S élevé (nous con 


tant : St vous avez ete dési nÊ par (3 sort, N oubliez jamais à 
l , 
£ 


i changeèeme ( cA 
Le ur un abonnement qui durera au: 


i ue € 
De tout CŒUT, nous souhaitons q 


se | 
Longue vie à tous : 


statistiques et de probabili- 
Lés. 


La dernière partie du 
livre est plus directement 
utilitaire : les auteurs ont 
choisi d’y exposer quelques 
exemples pratiques où la 
calculatrice est utilisée pour 
résoudre des problèmes de 
Baccalauréat, Une douzaine 
de pages est consacrée enfin 
à l’exposé de cent idées de 
programmes que le lecteur 
pourra exploiter à sa guise, 
Indéniabiement, il s’agit 
d’un ouvrage de bonne 
qualité, et il est probable 
que leurs auteurs attein- 
dront le but qu'ils s'étaient 
fixé. Reste qu’ils se sont 
adressés spécialement aux 
utilisateurs de la Ti-57 
LCD, même si les thèmes 
traités concernent tous les 
lycéens intéressés par les 
mathématiques et la pro- 
grammation. 


0 BE 


de dix personnes qui 


ju un chapeau vraiment 818 


HR is Roland Gallier 

75 Paris ; 
Mes Pat Ge Jean-Marie chou 
s DEA 76 Grand Couronne Jean-Ma 
dau 34 Assas sang 
re ‘e as ne 53 Bierne Jean-Noël Vilta 
Gérald Ler 


Dix nouveaux abonnés à vie 


5 j armi tous C D sr 
Ad ue Lies êtes-vous ? de FOp n 
Li 


: ne ut 
bénéficieront désormais d 
nuons d’ailleurs à en rece- 


: ib d d 
ellement imposs! le (2 pr ocË er en S 


la main innocente. V 


ordeaux 83 Ginasser vis 


Frédéric Sahuguet 54 Villers les Nancy 


es abonnements vien 


B UNE CASSETTE 


Chess 

Programme d’échecs en 
langage machine pour 
ZX 81-16 Ko MEM 
Psion computers 


Prix de la cassette : 
156 FFttc 


M De nombreux logiciels 
sont aujourd’hui disponi- 
bles pour le ZX 81. Le jeu 
d'échecs Chess est écrit en 
langage-machine ; c'est 
donc un programme rapide. 
Il requiert une extension de 
mémoire 16 Ko, et je dois 
dire qu’il m’a permis de 
passer de bons moments. 
La cassette est livrée avec 
un mode d'emploi (en fran- 
çais) court mais très expli- 
cite. Cette notice nous 
apprend d’abord que la 
cassette contient, en plus 
du programme d'échecs 


proprement dit, un 


eux et toutes celles 


ortant les bulletins 
C'est donc à un 
oici la liste des 


31 Muret Seysses 
76 Sotteville 
78 Marly le Roi 


étail impof- 
l'avenir de nous com- 


nent à expiration le 


© lOp 
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Sinciair 


ECHECS 


PART EE 


programme simulant les 
pendules couramment utili- 
sées dans les tournois 
d'échecs. À noter que la 
précision des temps mesurés 
est tout à fait correcte, ce 
qui s'explique vraisembla- 
blement par l’utilisation de 
la variable système FRA- 
MES. 

Mais voyons plus précisé- 
ment quelles sont les passi- 
bilités offertes par le jeu 
d'échecs. Avant toute 
chose, il faut bien entendu 
charger le programme. On 
sait que ce genre d'opéra- 
tions ne réussit pas toujours 
à la première tentative. En 
ce qui me concerne, j’ai dû 
m'y reprendre à plusieurs 
reprises, D’unc façon géné- 
rale, si vous avez des diffi- 
cultés de chargement, je 
vous conseille, avant de 
vous énerver, d'essayer un 
autre magnétophone : la 
solution n'est souvent pas 
plus compliquée que cela. 

Le programme Chess 
propose à l'utilisateur six 
niveaux de difficulté. Au 
premier niveau, la machine 
répond après quelques 
secondes seulement. Au 
deuxième niveau, Le temps 
de réponse est cnviron 
d'une demi-minutc, trois 
minutes au troisième, Les 
niveaux de difficulté supé- 
rieurs n'étant destinés qu'à 
des parties prolongées. 

Pour le débutant aux 
échecs, le premier niveau 


constitue déjà un adversaire 
coriace. Pour un amateur 
moyen, le jeu devient bon à 
partir du deuxième niveau 
et très bon dès le troisième. 
Au départ, l’utilisateur est 
tenu de répondre à quel- 
ques questions (en 
anglais) ; il choisit ainsi sa 
couleur, le niveau, ct il peut 
même définir la grille. Cha- 
cun de ces paramètres est 
redéfinissable en cours de 
partie par la commande 
RESIGN. 

Le programme a davan- 
tage été conçu pour être 
performant que pour offrir 
un graphisme recherché : 
les pièces sont en fait repré- 
sentées par l’initiale du mot 
anglais correspondant (K 
pour le roi, Q pour la reine, 
R pour la tour, B pour le 
fou et IL pour le pion). 
Quant à la couleur des piè- 
ces, c’est celle de la lettre 
sur fond vidéo inverse. Bien 
qu'il soit possible de suivre 
le déroulement des parties 
sur l'écran du téléviseur, il 
est beaucoup plus agréable, 
comme le conseille la 
notice, d’utiliser en paral- 
lèle un véritable échiquier. 
C’est même presque indis- 
pensable puisque le jeu dis- 
paraît pendant tout le 
temps de réflexion du pro- 
gramme (mode « fast »). 

Les déplacements sont 


ÉOSSH9SE 
Op AR Of Re CU 


pa 
GG 
Z 


FA 
L 
L 
L 
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2 
1 G 
2 E 
SF 
4 E 
SF 
ê E 
7 E& 
REC 
I 


DOONMAMAN 
HRPRPÉRRH 


Zisibtil 


ee 
e 
z 
? 
? 
£ 
ES 
ï 


ZZHPbHPPR 


exprimés dans le système 
classique de notation 
(colonnes de À à H et 
lignes de 1 à 8). Les coups 
illicites sont évidemment 
refusés et il est possible de 
roquer en introduisant le 
déplacement du roi. 

Chess est donc un bon 
partenaire aux échecs. Deux 
petits reproches : lcs désa- 
gréments qui découlent de 
l’utilisation permanente du 
mode « fast », et un char- 
gement du programme qui 
ne réussit pas toujours du 
premier coup. À part cela, 
si vous êtes seul avec un ZX 
81 (16 Ko) et si vous aimez 
jouer aux échecs, vous avez 
un adversaire à qui vous 
mesurer. 

L: JCL 


B Sharp s’apprêterait 
commercialiser 


une nou- 
velle série de son PC-1500. 
Sur ces nouveaux modèles, 
le contenu des mémoires 
mortes ne serait pas exacte- 


ment le même que celui des 
premiers modèles. En.parti- 
culier les boucles FOR... 
NEXT auraient été modi- 
fiées. Espérons que ces 
modifications n’empêche- 
ront pas les programmes 
écrits pour le premier 
modèle de tourner sur le 
nouveau ! 

En ce qui concerne le 
manuel du langagc- 
machine, toujours rien à 
l'horizon, autrement dit 
toujours personne qui en 


B j} n'est pas impossible 
que le FX-801 P fasse 
figure d’ancêtre avant 
même d’avoir été largement 
diffusé. Le constructeur 
japonais Casio aurait en 
effet décidé de ne plus 
fabriquer ce modèle. Au 
moment des fêtes de fin 
d'année, ce modéle avait 
été diffusé en France au 
compte-gouttes. Peut-être 
en reste-t-il ici ou là quel- 
ques exemplaires à 
vendre. 

On attend maintenant, 
après le 702 P et le PB-100, 
la machine de poche qui 
permettrait à Casio de 
répondre à des modèles tels 
que le PC-1251 de Sharp.) 


ait vu un exemplaire même 
rédigé en japonais. L.'appa- 
rition probable d’un nou- 
veau PC-1500 revu ct cor- 
rigé explique peut-être ce 
retard. Voilà qui laisse 
encore du temps à tous ies 
amateurs qui explorent le 
fonctionnement interne de 
leur machine. 

L'interface RS 232C 
commence en revanche à 
être commercialisée en 
France à un prix d’environ 
2 200 FF ttc. Les modules 
CE-159 (8 Ko de mémoire 
vive continue protégée par 
une alimentation électrique 
indépendante de l'unité 
centrale) ne devraient pas 
tarder à être disponibles. [1 
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M UN LIVRE 


L’assembleur facile 
du Z 80 

Olivier Lepape 
Éditions Eyrolles 
Paris, 1982 
Broché, 120 pages 
Prix : 60 FF 


B De nombreux ordina- 
teurs sont actuellement 
dotés du microprocesseurs 
Z 80 de Zilog. C’est, entre 
autres, le cas du Sinclair 
ZX 81 qui a déjà fait 
l’objet d’articles dans cette 
revue. 

Arrivé à un certain 
niveau de programmation, 
vous pouvez être tenté 
d'aller parler à votre ordi- 
nateur dans un langage 
qu'il comprendra directe- 
ment, sans passer Par url 
intermédiaire tel que le 
Basic. Plusieurs ouvrages 
traitant du vocabulaire du 
Z 80 existent déjà sur le 
marché, certains très géné- 
raux, d’autres ayant trait 
plus spécialement à tel ou 
tel ordinateur. 

L'assembleur facile du 
Z 80 fait découvrir ce voca- 
bulaire pas à pas, sans être 
destiné à une machine par- 
ticulière. Pour introduire à 
ce langage de programma- 
tion, l’auteur explicite les 
instructions Z 80 par analo- 
gie à celles qui sont dispo- 
nibles en Basic (affecta- 
tions, branchements de pro- 
grammes ou de sous- 
programmes, instructions 
logiques). 

De manière assez particu- 
lière, l’introduction au 
binaire, au bit, à l’octet, est 
faite au moyen d’une 
monstruosité anatomique : 
on compte sur ses doigts, 
mais avec une main qui 
présente huit doigts (deux 
fois plus que celle de Mic- 
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key). Vient ensuite une pré- 
sentation sommaire des 
registres internes du micro- 
processeur et des différents 
drapeaux, ainsi que la pré- 
sentation des modes 
d’adressage disponibles. 


L'auteur explique alors 
ce qu'est un assembleur : le 
niveau humain de la pro- 
grammation en langage 
machine. Humain, car plu- 
tôt que d’écrire des suites 
de 1 et de O pour définir 
une instruction en langage 
machine, on affecte à cha- 
cune d’entre elles une 
« mnémonique » plus par- 
lante pour le programmeur. 
Un programme assembleur 
sert ainsi à saisir les mné- 
moniques que vous rentrez, 
pour les traduire en instruc- 
tions du Z 80. 


Le dernier chapitre 
détaille les instructions du 
Z 80 les plus couramment 
employées dans la program- 
mation en Hangage ma- 
chine ; ce sont celles que 
vous utiliserez à vos débuts. 

L'auteur entendant nous 
faire découvrir le Z 80 sans 


A Lille, 
Le BOP redémarre 


Magazine 


brutalité, son livre est 
volontairement incomplet ; 
les interruptions notam- 
ment ne sont pas du tout 
commentées. Pour aller 
plus loin, il vous faudra 
alors disposer d’une « bible 
du Z 80 », mais ce premier 
livre vous permettra de 
franchir plus facilement 
l’étape préalable de l’initia- 
tion. 

En annexe, vous trouve- 
rez, et c’est l’un des atouts 
de ce livre, une liste des 
codes d'opérations par 
ordre numérique utile pour 
le désassemblage, et une 
liste des codes d'opérations 
par ordre alphabétique utile 
pour l'assemblage. 

CO BT 


Pour les cheminots 
de toute la France 


B Le mois dernier, 


nouveau club d’informati- 


que individuelle a vu 


jour. Microfer (tel est son 
nom) s’est donné pour 


M Créé en 1981, le club 
d'informatique de l'Ecole 
des Hautes Etudes Indus- 
trielles a repris ses activités 
depuis bientôt cinq mois. Il 
repart cette année avec des 
moyens plus importants et 
souhaite entrer en contact 
avec d’autres program- 
meurs individuels ou 
d’autres clubs dans toute la 
France et même à l’étranger 
(la Belgique n’est pas si 
loin..….). Parmi les activités 
du club, citons la prépara- 
tion de programmes en vue 
du prochain tournoi inter- 
national d’Othello-Réversi 
organisé par notre confrère 
l’Ordinateur Individuel, et 
l'édition d’un bulletin men- 
suel. 

Pour tout renseignement, 
écrire à 
BOP (Bureau des Elèves de 
l’école des Hautes Etudes 
Industrielles) 
13 rue de Toul 
59046 Lille Cedex 


objectif de regrouper tous 
les cheminots, et leur 
famille, qui sont intéressés 
par l'étude et la pratique de 
l'informatique individuelle. 

Tout comme la S.N.C.F., 
Microfer sera présent non 
seulement à Paris, mais 
aussi en province. Plusieurs 
sections locales seraient 
déjà constituées ou seraient 
en cours de création dans 
les grandes villes. D’autres 
sections seront probable- 
ment formées autour de 
projets communs à plu- 
sieurs adhérents, sels que la 
construction d’unités cen- 
trales ou d’interfaces par 
exemple. Toutefois le club 
entend demeurer disponible 
aux débutants en prévoyant 
à leur intention des stages 
d'initiation au Basic et à la 
programmation sur ordina- 
teur. 

Microfer se veut indépen- 
dant de tous les construc- 
teurs, importateurs et dis- 
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tributeurs et devrait être 
ouvert à toutes les familles 
d’appareils, sans exclusivité 
et sans complaisance, 
depuis Je plus petit 
poquette du marché 
jusqu’à l'ordinateur de 
table. Le club n'a pas 
l'intention d'ouvrir ses por- 
tes aux seuls possesseurs 
d’un matériel et il invite les 
hésitants à visiter ses sec- 
tions. Les candidats à 
l'achat d’un ordinateur (de 
poche ou non) pourront 
ainsi rassembler des indica- 
tions qui leur seront pré- 
cieuses au moment de fixer 
leur choix sur un matériel 
particulier. 

Il est également prévu 
qu’un bulletin sera édité et 
adressé gratuitement à cha- 
cun des adhérents qui 
obtiendront ainsi diverses 
informations sur la vie du 
club et les manifestations 
qu’il envisage d’organiser. 

Pour tout renseignement, 
s'adresser à 
Microfer {informatique 
individuelle) 

1 bis rue d'Athènes 
75009 Paris 


Une section PPC 
à Lausanne 


B Une section Suisse 
romande du club américain 
PPC s’est constituée à Lau- 
sanne au début du mois de 
décembre dernier : avis aux 
utilisateurs de la 41 C ou 
CV et de ses périphériques. 
Pour l'instant, les principa- 
les activités de la section 
consistent en des réunions, 
des échanges d’idées et des 
cours. La publication d’un 
journal interne décrivant 
toutes les activités du club 
est également envisagée. 
Pour tout renseignement, 
s’adresser à 
P.P.C. - CH. 
Case 79 
1000 Lausanne 24 [a 


Un algorithme 
amélioré 
pour calculer la 
fonction Gamma 


La méthode utilisée ici 
n’est pas nouvelle, 

mais grâce à une petite 
astuce mathématique, 

elle conduit à des résultats 
nettement meilleurs 
(programme pour HP-41). 


M |! est une fonction qui possède 
de multiples applications en mathé- 
matiques, statistique ou en électro- 
nique, et qui n’est pas sans ressem- 
bler à la fonction factorielle disponi- 
ble sur la HP-41, c'est Gamma. Seu- 
lement celle-ci possède l'avantage 
de n'être pas limitée aux arguments 
entiers positifs. Le programme ici 
proposé calcule cette fonction 
Gamma, en utilisant un algorithme 
connu mais en en tirant, grâce à une 
petite astuce mathématique, toute la 
puissance. 


Gamma est une fonction réelle 
d'une variable réelle, qui à tout 
n associe le nombre Fin) = 
JS x"! ex dx. Cette fonction est 
douée d'une propriété étonnante, 
immédiatement mise en évidence à 
l’aide d'une simple intégration par 
parties : Mn) = {n-1) Fin-1). De 
même, par récurrence, on à Fin) = 
{n—1)(n-—2) Fin-2}, etc, et donc, 
pour tout n entier positif, Fin) = 
{n—1)!. Cette propriété n'est, 
cependant, pas suffisante pour cal- 
culer Gamma, aussi allons-nous utili- 
ser une approximation de la fonction 
factorielle, bien connue sous le nom 
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de série asymptotique de Stirling : 
_(2yV ssl 
Fin+1) = { + 2nn (14 + 
1139 571 
288n2 51840n3  2488320n4 
que l'on simplifiera en posant y = 


(Ep V 2m (1+y 


571). 
Ÿ 120 


1 œ 
Tn etlin+1) € 


+ y - y GS + 
ve, Ar 


Fonction Gamma 
Programme pour HP-41 C 
Auteur Robert Pulluard 
Copvright l'Ordinateur de poche 
et l’auteur. 

BeLBL “GRSS 

5TG 88 


Bi 


L'approximation étant d'autant 
plus mauvaise que n tend vers O, si 
le programme se bornaït à appliquer 
cette formule on ne ferait guère 
mieux qu'HP dans son livret « High- 
level/Math »... Avec cette appro- 
ximation de Gamma, en effet, 
F(2}=0,999499469 (au lieu de 1} et 
les résultats vont se perdre dans les 


‘limbes de — æ quand n tend vers 0, 


ce qui est en contradiction avec le 
comportement de la fonction 
Gamma (voir le graphe). 


La méthode adoptée est en fait 
très simple : une bonne précision du 
calcul étant obtenue autour de 15, 
on se ramènera donc, pour tout 
argument n inférieur à 15, au calcul 
de F(15+a), où a représente la par- 
tie fractionnaire de n, et, ensuite, on 
reviendra à F(n) en convertissant le 
résultat. Pour ce faire, on utilisera la 
propriété ci-dessus décrite : Mn) = 
{n—1) Ffn-1). I vient Fin-1) = 
Fin)/(n-1} mais aussi, par récur- 
rence, ln—2)=F{n)/[(n—1)tn -2)], 
etc. 

Un calcul simple va nous aider à 
illustrer l’aigorithme, pour tout argu- 
ment inférieur à 15, par exemple 
8,5 : F (8,5) = F (15,5)/(14,5 + 13,5 
# 12,5 +... x 8,5). 


Le calcul de F (15,5) est réalisé à 
l'aide de la fonction de Stirling, et le 
résultâät est ensuite conformément 
pondéré pour se ramener à | (8,5). 


Cette petite astuce mathémati- 
que, ernployée pour tout n < 15, 
permet à elle seule d'obtenir de très 
bons résultats et, surtout, un com- 
portement de l'approximation en 
tout point semblable à celui de la 
fonction Gamma. 


Cj Robert Pulluard 
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Le jeu 
du pot 
aux 
roses 


(PC-1211) 
(PC-1) 


Un pot aux roses ? En vérité non : 


et c'est à vous de retrouver 
où votre poquette les a dissimulés. 


Le pot aux roses 

Programme pour PC-1211 

Auteur Stanislas de Boisgrollier 

Copyright l'Ordinateur de poche et l'auteur 
1L'FÜR EST 8 PRELICITATID 
23 FÜR J=iTG 6 : EH 
Fe Jt+JTÀ À 


AIMHERT JT 

SINEXT E 
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20: FOR B=1T0 &: 
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30 ir L + E: 
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Le COST CE 


+50: RETUFH 
0! QE 
SA FOR N=IGTO 1 


[) 
Et: X=AES (43972 
L+2+K)IV=ES+ 


Î 
SAC Ne224kRt X=U— 
INT CV x 
do: ACNY=INT (10 
NI, Phi su) +1 
dt: IF CN=1L6DLET 
ACNY=ACND+E 
C:HEXT N 
Aa pe oE 
LEUHLUE À CJD= 
Sue IF CE=2>+CA< 
UD=AÇU-10))= 
26070 519 
STIIF CBR=Z)+CAC 
UD=NCL+10)2+ 
CACIDD=ACLH-20 
>)+CA{U-tA)= 
ACLU- 20) > >=2 
GTS S10 
+ A(S)=i 
2: RETURN 


ŒÆ Un petit lopin de terre (six mètres 
sur six) est découpé en 36 portions 
d'un mètre carré qui constituent les 
cases de la grille sur laquelle se 
déroulera le jeu. Trente-trois de ces 
cases n'ont en fait aucun intérêt. 
Mais dans les trois dernières (et elles 
ont été choisies au hasard}, un 
esprit malicieux qui n'est autre que 
votre PC-1211 a enterré un pot aux 
roses. Parviendrez-vous à les décou- 
vrir tous en un minimum de temps ? 
Si le hasard, parfois, fait bien les 
choses, vous devrez surtout comp- 
ter sur vos capacités de déduction. 


Au début de chaque partie, on se 
trouve placé à un endroit bien précis 
de la grille, très précisément dans fa 
case dont les coordonnées sont 4.3 
{voir fig. ci-dessous). Le poquette, 


La croix est en 4,3. 

Dans le dénombrement Nord et 
Sud, la partie horizontale de la 
croix ne sera pas comptabilisée. 
Dans le dénombrement Est et 
Ouest, la partie verticale de la 
croix ne sera pas comptabilisée. 
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Le jeu 
du pot aux roses 


(PC-1211, PC-1) 


Organisation du programme 


e Lignes 1 à 5 : initialisation. La machine vide .une par une les cases de la 
gritle. L'ordre CLEAR n'a pas été utilisé à cause du générateur de nombres 
aléatoires. 

+ Lignes 10 et 20 : trois cases sont tirées au sort pour recevoir Un pot aux 
roses, et le programme désigne la première position de la croix (ordonnée 4 et 
abscisse 3). 

+ Lignes 500 à 580 : sous-programme ‘’A”’ qui détermine de façon aléatoire les 


trois cases gagnantes. Le pragramme vérifie que les trois cases sont différen- 
tes les unes des autres. 
e Lignes 30 et 50 : impression des messages {position de la croix et résultats 


du dénombrerment), 


+ Lignes 70 à 90 : l'essai du joueur est-il ou non couronné de succès ? 
« Lignes 200 à 450 : sous-programmeé “D”, comme dénombrement. L'ordina- 
teur comptabilise le nombre de cases gagnantes situées au Nord, au Sud, à 


l'Est et à l'Ouest de la case jouée. 


après un petit délai de réflexion, 
indique s'il y a un (ou plusieurs} pot 
aux roses caché au Nord, au Sud, à 
l'Est et à l'Ouest de cette case. Fort 
de ces renseignements, on demande 
alors à se déplacer sur une autre 
case que l’on désigne en indiquant 
dans l’ordre son ordonnée {nombre 
de 1 à 6, puis ENTER) et son abs- 
cisse (même remarque). C'est cette 
nouvelle case qui devient alors le 
point de repère : de nouveau l'ordi- 
nateur indique s'il ÿ a un (ou plu- 
sieurs) pot aux roses caché au Nord, 
au Sud, à l'Est, etc. 


Par recoupements, et en procé- 
dant par élimination, on finit tôt ou 
tard par se placer sur l'une des trois 
cases gagnantes, puis sur une 
deuxième, et sur la dernière. En 
trente-six essais, on est évidemment 


sûr de son fait, mais prendriez-vous 
le pari de réussir en six ou sept 
essais ? En fait, vous devrez déve- 
lopper une stratégie pour améliorer 
vos résultats. 


À ce propos, il est important pour 
vous de savoir que, par rapport à la 
case où vous êtes placé, toutes cel- 
les qui sont situées exactement au 
Nord ou au Sud ne sont ni à l'Ouest 
ni à l'Est : le programme ne tiendra 
aucun compte de ces cases lorsqu'il 
indiquera s'il y a où non quelque 
chose à chercher à l'Est ou à 
l'Ouest. De la même facon, toutes 
les cases qui sont exactement à l'Est 
et à l'Ouest de la vôtre ne seront 
pas considérées comme étant au 
Sud ou au Nord. Contrairement à ce 
que l'on pourrait penser, cette parti- 
cularité, quand elle est bien exploi- 


Exemple d'exécution 


FELUSSI 1 


+ 4,5, 

SU, Gt, 

RATE! 

+ 1.6. 

HO, Si, Cid. 
FELISST ! 

FELICITATIOHS,.. 


HI. 


Au début de la partie, le pro- 
gramme nous indique que nous som- 
mes dans la case de coordonnées 
4.3, qu'il y a deux cases intéressantes 
au Nord, une à l'Ouest et deux à 
l'Est. Nous nous rendons dans la 
case 2.6, et c'est ‘raté’, de même 
qu'au coup suivant avec la case 1.4. 
On parvient néanmoins assez rapide- 
ment à la solution : en réalité, dans le 
cas présent, nous avons triché ! 


tée, peut fournir des renseignements 
utiles. 


Voilà donc une histoire de jardin 
et de pot aux roses. Un jeu bien pai- 
sible en somme. Mais rien n’empé- 
che ceux qui le désirent d'interpréter 
tout cela dans un autre esprit et 
d'imaginer, par exemple, qu'il s'agit 
d'une bataille navale ! 


[1 Stanislas de Boisgrollier 


faites découvrir vos amis 
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Faites le point 
sur la Lune 
et sur les planètes 


Le mois dernier, 

nous avons appris 

un moyen simple 

de nous repérer 

sur le Soleil. 

Voyons maintenant 

ce que l’on peut attendre 
de la Lune et des 
planètes. 

(Programmes pour TI 59 
et FX-702 P.) 


M En fait, on ne peut pas mesurer 
la hauteur d’une planète en pleine 
nuit faute d'un horizon visible. 
Quant à la Lune, elle a la désagréa- 
ble habitude de faire apparaître de 
faux horizons. 

il n'empêche : les planètes four- 
nissent de bons moyens de se repé- 
rer un quart d'heure environ avant le 
lever du Soleil et un quart d'heure 
après son coucher. On doit égale- 
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ment savoir que la Lune est visible 
de jour à peu près une journée sur 
trois, particulièrement dans les 
périodes où elle est en quadrature 
avec le Soleil, c'est-à-dire aux envi- 
rons du premier et du dernier quar- 
tiers. 


On peut par conséquent tracer 
une droite de hauteur et la comparer 
avec une autre droite prise sur le 
Soleil immédiatement avant ou 
après. Ces deux séries de visées ne 
demandent guère que deux minu- 
tes : il ne sera donc pas nécessaire 
de déplacer la première de ces droi- 
tes d'une distance égale à celle que 
le bateau aura parcouru entre les 
deux visées. Même si vous filez 10 


nœuds, vous n'aurez effectué que 
600 mètres entre les deux visées, ce 
qui — dans le cas qui nous 
intéresse — est négligeable. On 
obtient ainsi un point complet et 
précis du fait que les droites de hau- 
teur se recoupent aiors avec un 
angle assez grand. 


Cela étant dit, comme dans le cas 
du Soleil, les calculs sont longs et 
fastidieux : mieux vaut les confier à 
un ordinateur. Une différence toute- 
fois avec le Soleil : la Lune et les 
quatre planètes de navigation 
(Vénus, Mars, Jupiter et Saturne) 
ne sont pas classées pour rien dans 
la catégorie des astres dits 
« errants ». Leur trajectoire étant 
relativement proche de la Terre, ils 
présentent des mouvements appa- 
rents si capricieux qu'il n'est pas 
question de demander à un 
poquette d'en effectuer les calculs. 
On utilisera donc les éphémérides. 


Les éphémérides donnent, pour la 
Lune et les quatre planètes de navi- 
gation, les coordonnées équatoriales 
{angle horaire et déclinaison) 
d'heure en heure, et cela pour cha- 
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Point sur la Lune et les planètes 
Programmes pour T1 59 

Auteur Lucien Strebler 

Copyright l'Ordinateur de poche et l'auteur 
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que jour : elles donnent aussi un 
élément supplémentaire : la paral- 
laxe qui est représentée par la lettre 
nr. La parallaxe est donnée d'heure 
en heure pour la Lune et pour toute 
la journée en ce qui concerne les 
planètes. 


Pour être vraiment pratique, le 


À vos risques et périls : 
Point sur la Lune 

et les planètes 
Programme pour FX-702 P 
Auteur Lucien Strebler 
Copyright l'Ordinateur de poche 
et l'auteur 


Comme pour tous les logiciels sus- 
ceptibles d'être appliqués à des situa- 
tions sérieuses, les programmes pré- 
sentés ici devront être entièrement tes- 
tés avant d'être utilisés autrement que 


dans le cadre d’une simulation. Le 
lecteur vérifiera donc que les résultats 


procédé utilisé doit vous dispenser 
de tout calcul et vous éviter les 
interpolations propres à l'usage des 
tables de données. Quel que soit le 
moment de votre visée, vous dispo- 
sez toujours des éléments nécessai- 
res pour l'heure ronde antérieure et 
l'heure ronde postérieure par lecture 
directe. 


——————UÜn rappel —— 
indispensable : ——— 
—la droite de hauteur -— 


Par un point quelconque libre- 
ment choisi sous la seule condition 
d'être à moins de 20 milles de votre 
position, vous tracez une droite fai- 
sant avec le Nord vrai un angle 
appelé azimut, Sur cet azimut, vous 
portez une longueur PH appelée 
intercept. Ces deux valeurs vous 
sont données directement par la 
machine. Par H, vous tracez la per- 
pendiculaire à l'azimut: votre 
bateau se trouve quelque part sur 
cette droite (fig. ci-dessous). 


”, 


Les programmes pour TI59 et 
FX-702 P qui accompagnent cet arti- 
cle calculent intercept et azimut en 
fanction de plusieurs données : 

. la ou les hauteurs mesurées (de 
préférence quatre ou cinq) ; 

. les heures correspondantes à cha- 
que mesure ; 

. les angles horaires pour les heures 
rondes antérieures et postérieures ; 
e les déclinaisons pour les heures 
rondes antérieures et postérieures ; 
. la parallaxe ; 

. et enfin la position géographique 
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fournis par ces programmes sont tou- 
jours exacts avant de les employer 
pour piloter une embarcation réelle. 


Cl NDLR 


du point à partir duquel vous avez 
choisi de faire votre tracé. 


Chacune des deux machines uti- 
lise un seul et unique programme 
qui traite à la fois le cas de la Lune 
et celui des planètes. Quel que soit 
l'astre visé, on introduira donc la 
même série d'éléments. Dans le cas 
de la Lune, on obtiendra deux 
réponses différentes selon que l'on 
aura visé le bord supérieur ou le 
bord inférieur. Concernant les planè- 
tes, les deux réponses seront identi- 
ques. 


————— Sur TI 59, 
deux cartes 
——— magnétiques 


Bien que le programme ne com- 
porte au total que 355 pas, il sera 
nécessaire d'utiliser deux cartes 
mais sans modifier la partition de 
base. On commencera par entrer au 
clavier la liste n° 1 et on la sauve- 
gardera sur la première piste d'une 
carte. Dans un second temps, on 
entrera la liste n° 2 que l’on enregis- 
trera à son tour sur la première piste 
d'une autre carte. 


Une fois que ce travail prélimi- 
naire sera terminé, on procèdera 
ainsi : 

1. Entrer en mémoire le programme 
de la carte n° ?t (155 pas au total, de 
000 à 1541). 

2. Initialiser en pressant 2nd E’. 

3. Introduire les différentes heures 
de visée en À, l'angle horaire pour 
l'heure ronde antérieure en 2nd B', 
l'angle horaire pour l'heure ronde 
postérieure en B (note 1}, la décli- 
naison pour l'heure ronde antérieure 
en 2nd C’, la déclinaison pour 
l'heure ronde postérieure en C, la 
série des hauteurs en D et la correc- 
tion instrumentale e même si elle 
est nulle. On presse alors sur la 
touche E pour déclencher le calcul 
{note 2). 


18 VAC :PRT LUNE/ 
PLAN? 


28 INP ”H. TU”, Ni IF 
N=8 THEN 40 

38 H=480:658 H:X=X 
PRE 2 


48 INP "HIT,NSIF K 
=Q THEH 68 
38 658 H:P=P+N: GOT 


à 48 

68 INP ”E”,C,”LAT” 
2N:65B H:L=N: IN 
P "LONG”,N:G5B 
H° ch 


16 INP ?RH.ANT”,Ns 
6SB H:T=N: INP 
AH POST”,N:6SB 
HEUEN 

88 INP "D. RHT”,N:6 
$B H:V=N:INP "D 
.POST”,N:6SE Hi 


YEN 

96 IHP "a", J=I/X 
D=V+(N-Y)#FRAC 
Ji8=U-T:3F UKT 
:8=8+360 

188 B=T+B4FRAC JG: 
IF ACIA=Ù 

110 F=A#(COS (P/X+C 
468)+3/11)-2,6- 
12TAN (P/X) 

126 Y=ASN (SIN DXSI 
À L+C0S Deco L 
+C0S B):F=F+C+46 
8 (P/X-Y) 

138 SET FLiPRT "INF 
2 FICSR 115 ”7SÙ 

27: F-Ax6/1! 

144 S=ASH (COS D/C0 
$ Y#SIN B):R=CT 
AN DæC0S L-SIN 
(4005 B)/SIX B 

159 IF RCG:IF 5815 
s-6:6070 1% 

164 IF RO: S=189+5: 


&OTE 198 

170 IF 5(95S=188+5: 
6010 198 

188 S=J60-S 

198 PRT "22"; 

286 PRIT T4, MOY="5: 
DHS 1/X:END 


. 488 2=56N N:N=ABS N 


ESFRAC Nti8ih 
INT N4INT €/60 
FRAC E/36 

418 N=HeZiRET 
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4. Alors, sans arrêter la machine, on 
entre en mémoire le programme de 
la carte n° 2 (200 pas au total, de 
000 à 199). 

5. Il faut ensuite introduire la paral- 
laxe exprimée en minutes d'angle et 


Faites le point 
sur la lune 


et sur les planètes 


dixièmes en 2nd À’, puis la latitude 
et la longitude du point choisi en A 
et B respectivement. 

6. Une pression sur 2nd D’ donne 
l'intercept si l'on avait visé le bord 
supérieur de la Lune et D donne 


Exemple d'application 
Le 16 juillet 1982, nous sommes aux environs du point de latitude 40° 


Nord et de longitude 8° Est. 
Lune : 

e à 4 h 30 mn 40 sec : 
«à 4h 30 mn 52 sec : 
à 4h 31 mn 08 sec : 
e à 4h31 mn 20 sec : 


45° 59° 
46° 02’ 
46° 08 
46° 11° 


HOUOHON 


On effectue les relevés suivants concernant là 


Les relevés ont été effectués sur le bord inférieur de la Lune et la correc- 


tion du sextant est nulle. 


Quelques minutes plus tard, on effectue des relevés sur Vénus : 


< 4h 34 mn 15sec : HI 
4h 34 mn 35 sec : HI 
e 4h 35 mn 35 sec : HI 
+ 4h 35 mn 55 sec : HI 


26° 21° 
26° 22° 
26° 26° 
26° 27° 


WU 


Les éphémérides du 16 juillet 82 nous indiquent pour la Lune, à 4 h00 
AHao 305° 43,3 (soit 305° 43°18”}) et une déclinaison de 13° 23,7 (soit 
1322342") ; à 5 h 00 AHao 320° 11,1 {soit 320° 11‘06"') et une déclinaison 
de 13° 35’,0 {soit 13° 35‘00"} ; la parallaxe est de 59',4. 

En ce qui concerne Vénus, les éphémérides nous fournissent les indica- 
tions suivantes : à 4 h 00 AHao 269 31,6 {soit 269° 31'36”} et une déclinai- 
son de 22°21°3 (soit 22° 21°18")}; à 5 h 00 AHao 284° 309 (soit 
284° 30‘54") et une déclinaison de 22° 21,5 {soit 22° 2130} ; la parallaxe 


est de 0,1. 


La série de relevés effectués sur la Lune nous fournira un intercept (bord 
inférieur) de 3,4 et un azimut de 116°,8 ; l'heure moyenne d'observation est 
4h 31 mn 00 sec. Pour mémoire, l'intercept sur le bord supérieur de la Lune 


est de — 29,0. 


Les relevés sur Vénus nous donnent un intercept de + 0’,8 et un azimut 
de 82° pour une heure moyenne d'observation de 4 h 35 mn 05 sec. 
L'ensemble de ces renseignements est exploité dans le schéma ci-dessous. 


Posihon du bafeau 
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PH1 = 34 miles 
PH2 = O8 mile 


= 


l'intercept si l'on avait visé le bord 
inférieur (dans le cas d'une planète, 
l'un et l'autre de ces deux labels 
donnent le même résultat}. 

7. Une pression sur E donne enfin 
l’azimut en degrés décimaux. 


L'exemple donné dans l'encadré 
ci-contre vous permettra de vérifier 
que vous avez assimilé l'utilisation 
du programme. 


Remarque importante : aussi 
bien pour TI 59 que pour FX-702 P, 
toutes les heures s'entendent en 
Temps Universel et seront expri- 
mées dans le format HH.MMSS. De 
la même facon, tous les angles 
seront exprimés dans le format DD. 
MM SS à l'exception de la correc- 
tion instrumentale et de la parallaxe 
qui sont en minutes d'angle et dixiè- 
mes. Les longitudes sont comptées 
positivement vers l'Est : pour rétablir 
la notation standard, il convient de 
remplacer + par — au pas 111 de la 
carte n°2 (T1 59), et G = N par 
G = — N à la ligne 60 du pro- 
gramme pour FX-702. 


Dans sa version pour le poquette 
Basic de Casio, le programme est 
plus simple à utiliser. Quand il 
demande « H.TU ? », on répond en 
indiquant l'heure d'observation. 
Lorsque la série des heures a été 
épuisée, on répond par zéro et l'affi- 
chage demande alors « HI ? ». On 
introduit alors la série des hauteurs 
en terminant par zéro. Le pro- 
gramme demande alors la correction 
instrumentale, la latitude, la longi- 
tude, les angles horaires antérieur et 
postérieur, les déclinaisons anté- 
rieure et postérieure et enfin la paral- 
laxe exprimée en minutes et dixiè- 
mes. Les résultats s'affichent alors 
successivement : l'intercept du bord 
inférieur et du bord supérieur 
(CONT), l'azimut (CONT) et l'heure 
moyenne d'observation. 


CE Lucien Strebler 


{1} Les éphémérides donnent les angles horai- 
res et les déclinaisons en degrés, minutes et 
dixièmes de minutes. Ces angles doivent être 
transformés avant utilisation en DD.MMSS : 
on multipliera le dernier chiffre par 6. 

{2} L'introduction de toutes les données pré- 
cédentes peut se faire dans le désordre à {a 
condition d’avoir initialisé et d'introduire /a 
correction instrumentale en dernier. 
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Qu’y a-t-il 
dans une 
HP 34 C 


i 


Chacun son tour : 
c'est aujourd’hui 
la HP 34 C 

qui va subir 
l'épreuve du 
démontage 

sous l'objectif 
vigilant d’un 
appareil photo. | 
Vous pourrez ainsi | 
satisfaire 
votre curiosité 
sans mettre 

en danger votre 
propre calculatrice. 


B La 34 C est apparue sur le mar- 
ché il y a un peu pius de trois ans et 
ne présente guère qu’une caractéris- 
tique qui date un peu, son affichage 
à diodes électroluminescentes : elle 
ne peut afficher que des chiffres et 
elle doit refaire le plein d'énergie 
assez fréquemment. Mis à part cela, 
elle conserve de jolis atouts : de 70 
à 210 pas de programme selon la 
partition mémoire qui permet d'attri- 
buer jusqu'à 20 registres de don- 
nées, quatre indicateurs binaires, 
8tests, 2 touches utilisateurs, 
10 étiquettes numériques. Et quatre 
touches que l'on ne trouve pas sur 
beaucoup de calculatrices : facto- 
rielle et fonction gamma, Soive per- 
mettant de résoudre des équations 
sans dévorer la mémoire programme 
ainsi qu'/ntegrate qui permet de 
s'attaquer aux calculs d’intégrales. 
À signaler aussi la mémoire conti- 
nue: ü n'est pas nécessaire de 
recharger programmes ou données 
entre deux utilisations de la 
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sis s isioisimnnes 


quand on l’ouvre ? 


Photo 2 


machine. Après ce petit éloge, qui 
n'a rien de funèbre, nous allons opé- 
rer. 


——— Démontage : —— 
— doigts de chirurgien — 


— et nerfs d'acier 


Première opération, ouvrir le loge- 
ment de batterie et en extraire déli- 
catement les deux accus au cad- 
nium-nickel maintenus solidaires par 
leur gaine métallique. Dévisser les 
deux vis cruciformes situées au- 
dessus de la cavité. Le corps arrière 
peut s’écarter un peu, mais il reste 
bloqué en bas du boîtier. Ecraser 
légèrement les lamelles de contact 
d'accus pour ne pas les tordre en 
ouvrant. On peut maintenant écarter 
davantage les deux flancs du boîtier. 
Mais il y a toujours une nette résis- 
tance dans le bas. Alors, de deux 
choses l’une : ou l’on est dépanneur 
chez HP et l'on dispose de l'outil 
permettant de dégager le crochet 


d'assemblage ; ou bien l’on a les 
nerfs solides... Si c'est le cas, on 
tire assez vivement en écartant les 
deux parties du boîtier. Impossible 
d'agir en douceur, ça ne viendrait 
pas et ce serait périlleux pour le cro- 
chet. C'est fait ? Ouf! Alors on 
ramasse par terre les touches R/S et 
+, Que s'est-il passé ? Rien de 
grave : un geste un peu trop brus- 
que et le crochet a fait levier sur le 
bas du circuit imprimé qui mainte- 
nait ces touches ; il suffit de les 
remettre à leur place. 

Observons maintenant le specta- 
cle {photo n° 2). Le circuit imprimé 
est visible à travers les ouvertures 
d'un châssis en plastique qui assure 
la rigidité de l'assemblage interne. 
Trois petits circuits intégrés et un 
gros. Aucun .composant discret 
n’est visible. Pourtant nous en 
découvrirons tout à l'heure au revers 
d'un petit circuit imprimé plaqué 
contre le grand. En haut de la 
machine, on aperçoit encore en par- 
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Qu'y at-il 
dans une HP34C 


quand on l’ouvre ? 


tie un autre circuit avec des pistes 
argentées : le dos de l’afficheur. 


Enlevons maintenant le châssis de 
maintien. Pour cela il faut dégager 
les six crochets latéraux qui fixent 
l'ensemble. Leur ajustement est très 
précis et l'opération est délicate : on 
utilisera plusieurs tournevis en guise 
de leviers. De nombreuses mains 
seraient nécessaires, et comme nous 
n'en avons que deux il faudra « faire 
avec » et garder son calme, ou se 
préparer à ramasser quelques tou- 
ches par terre. 


Une fois le châssis enlevé, le cir- 
cuit imprimé ne tient plus que par 
quatre picots de centrage. Le petit 
circuit imprimé du dessus pourra 
maintenant basculer, si nous enle- 
vons de leur logement les lamelles 
de contact de batteries. Délicatesse 
requise. les jonctions sont en effet 
assurées par des pistes cuivrées 
sous plastique souple. Le circuit que 
nous avons ainsi dégagé (photo 4) 
supporte tous les composants de 


LE 27 


l'alimentation : 5 diodes dont une 
« zener », deux condensateurs chi- 
miques, deux au tantale et un der- 
nier au mylar, quelques résistances 
de puissances diverses et quatre 
transistors. Un minuscule transfor- 
mateur est fixé à une extrémité du 
circuit. |} fabrique, à partir de la ten- 
sion de batterie onduiée par un 
oscillateur, les différentes tensions 
nécessaires aux circuits intégrés et à 
l'afficheur. 


Le circuit imprimé principal est en 
verre époxy. Les pistes .de cuivre 
sont recouvertes d'une mince pelli- 
cule d'or destinée à assurer la qua- 
lité des contacts. Un vernis, enfin, 
protège les pistes contre l'oxydation 
aérienne. Le circuit est gravé double 
face. Une face réalise les jonctions 
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entre les circuits intégrés et l’autre 
supporte les contacts du clavier. 
Nous irons observer ce côté-là de 
plus près tout à l'heure, Revoyons 
un instant les quatre circuits inté- 
grés que nous avons déjà signalés, 
Le plus gros comporte 40 pattes qui 
sont reliées pour la majorité (25) aux 
touches du clavier et à l’afficheur. 
Les autres liaisons vont vers les trois 
petits circuits intégrés et l'alimenta- 
tion. Ce gros circuit est donc l'unité 
centrale de la calculatrice. 1! contient 
l'unité arithmétique et logique (UAL) 
et l'horloge dont les osciliations vont 
synchroniser les différentes actions 
du système. Ce circuit, comme le 


Ci-dessous, photo 5, la face 
avant du boîtier vue de 
l'intérieur. On remarque dans 
la partie supérieure les 
contacts des interrupteurs 
OFF-ON et PGM-RUN. À 
droite, photo 6, l'envers du 
clavier. 


s us : 


Se 4 


Photo 4 : 

le circuit d’ali- 
mentation : 
transistors, 
diodes, 
résistances, 
condensateurs. 


laissent supposer ses connexions, 
gère également l'affichage et assure 
la consultation des contacts du cla- 
vier, Enfin il communique en mode 
série avec les trois petits circuits 


intégrés. Ceux-ci contiennent 
l'ensemble des mémoires du 
système : mémoire morte renfer- 


mant les micro-programmes de cal- 
cul et mémoire vive assurant le stoc- 
kage des données et des instruc- 
tions de programme. Nous avons 
maintenant exploré tout ce qui était 
visible sur cette face du circuit 
imprimé. 

Poursuivons le démontage en 
enlevant le circuit pour dégager le 
côté clavier et afficheur. On y par- 
viendra en sortant des picots de 
centrage et en écartant légèrement 


les crochets latéraux. La manipula- 
tion doit se faire en laissant la calcu- 
latrice (ou plutôt ce qui en reste) 
bien à plat pour que les touches ne 
s'échappent pas. Nous avons main- 
tenant dans une main le circuit com- 
plet de la machine et sur la tabie la 
face avant du boîtier. On remarque 
sur la photo 5 un tapis de mousse 
qui recouvre les cabochons des tou- 
ches. Entre ce tapis et l'écran rouge 
de l'afficheur deux petits cavaliers 
métalliques constituent les contacts 
des interrupteurs marche-arrêt et 
programmation-exécution. 


Si l'on enlève le tapis, on peut 
voir l'envers des cabochons de tou- 
ches {photo 6). Ceux-ci sont mobi- 
les sur une sorte de charnière que 
l’on distingue en bas de chaque tou- 
che. Au centre des cabochons, on 
remarque une petite barre saillante 
destinée à presser sur les coupelles 
métailiques qui recouvrent l'une des 


faces du grand circuit 
{photo 7). 


Ces coupelles ont la forme d'une 
tête de punaise mais sont beaucoup 
plus fines. Elles réalisent le contact 
électrique de la touche puis se trans- 
forment, dès que la pression est 
supprimée, en ressort de rappel. 
Une feuille adhésive de plastique 
transparent maintient les coupeiles 
sur leurs contacts respectifs. La 
photo 8 montre le coin supérieur 
droit du circuit imprimé. La feuille 
adhésive a été décollée, emmenant 
avec elle la coupelle que montre la 
flèche. Les contacts de clavier ont 
ainsi été dégagés et l’on remarque 
deux cercles concentriques gravés 
sur le circuit imprimé. Le cercle 
extérieur est en contact permanent 


imprimé 
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mar nm 


avec la coupelle, C'est le petit cercle 
du centre qui réalise la jonction élec- 
trique lorsque la touche est enfon- 
cée. Le petit trou visible sur te cercle 
central traverse le circuit imprimé et 
assure la liaison électrique avec une 
piste cuivrée située de l'autre côté 
de la plaque. Par le jeu des pistes 
cuivrées sur les deux faces du circuit 
imprimé, les contacts du clavier sont 
organisés en colonnes et rangées 
selon un schéma qui nous est main- 
tenant familier : 7 rangées et 5 
colonnes, donc 12 liaisons pour des- 
servir l'ensemble du clavier. Un mul- 
tiplexage assuré par l'unité centrale 
provoque une consultation en 
séquence des colonnes et rangées. 


Le même principe de multiplexage 
régit les segments de l'afficheur. 22 
liaisons sont visibles entre le circuit 
principal et le petit circuit de l’affi- 
cheur. La face avant de ce dernier 
est recouverte par un barreau de 
plastique où sont moulées 12 petites 
loupes {photo 9). Les chiffres sont 
ainsi agrandis et deviennent plus 
visibles. I est en effet intéressant de 
réaliser un afficheur le plus petit 
possible car la consommation élec- 
trique dépend directement de sa 
taille. Pour réduire encore la con- 
sommation, les segments d'affi- 
chage ne sont pas allumés en con- 
tinu, mais pendant des temps très 
courts et suffisamment rapprochés 
pour que la. persistance des images 
rétiniennes donne l'illusion d'un allu- 
mage permanent. 


Tous les segments identiques des 
afficheurs sont branchés en paral- 
lèle. Une électrode commune à tous 
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A Photo 8 : 
gros plan sur l'un des 
contacts du clavier. 


«Photo 7 : 

les contacts des touches 
et l’afficheur (face 
antérieure du circuit 
imprimé). 


à 

Photo 9 : 
sous la rangée 
des loupes de 
l'afficheur, on 
notera le 
cavalier de 
l'interrupteur 
marche-arrêt. 


les segments d'un même afficheur 
permet de n'allumer celui-ci qu'au 
moment où les bons segments sont 
alimentés. C'est encore l'unité cen- 
trale qui se charge de la gestion du 
multiplexage de l'affichage. La 
photo 10 montre le détail d’un affi- 
cheur vu au microscope. On remar- 
que que certains segments sont allu- 
més dessinant le chiffre 2. La com- 
mande des segments est assurée 
par les petits fils métalliques visibles 
à la périphérie de la photo. En bas à 
droite deux petits segments repré- 
sentent l'un le point décimal, l’autre 


Photo 10 : 

le détail d’un afficheur 
photographié 

au microscope. 


la virgule. || faut noter que les seg- 
ments principaux de l'afficheur ne 
sont pas tous de simples barres, 
comme c'était le cas sur la TI 57 
{voir /'Op n° 6, p. 42). L'extrémité 
de deux des segments est recourbée 
sur la gauche donnant ainsi des chif- 
fres mieux dessinés. Le signe HP a 
été gravé en double exemplaire sur 
l'afficheur. La finesse du dessin 
donne un aperçu de la précision 
nécessaire à la réalisation d’un tel 
composant. Le petit rectangle de 
silicium ne mesure en effet que 
1,55 x 2,05 mm. Le segment hori- 
zontal du milieu mesure 0,85 mm et 
les fils de liaison ont 0,025 mm de 
diamètre. 


—— Peu de bricolages — 
possibles 


Du fait de l'intégration importante 
du système, il y a peu de réalisations 
simples qui soient accessibles. Seu- 
les sont envisageables la classique 
télécommande externe de la touche 
R/S et la gestion d'un automatisme 
à partir de l'afficheur. Dans le pre- 
mier cas il faudra souder directe- 
ment sur le circuit imprimé les fils 
venant d'un contact de relais. Sur 
l'afficheur, il faudra repérer les seg- 
ments ou l'électrode commune inté- 
ressants et souder sur la liaison des 
deux circuits imprimés. Ce sont des 
opérations délicates que vous ne 
devrez tenter que si vous n'avez 
plus grand'chose à attendre de votre 
HP 34 C. 


Pour ma part, il ne me reste plus 
qu'à remonter la calculatrice : 
remise en place du circuit imprimé, 
du châssis plastique. La partie 
arrière du boîtier est engagée par le 
bas. Un appui sec pour encliqueter 
le crochet. Remise des deux vis, du 
bloc de batteries et de son capot. 
Voilà c’est terminé, il y a juste 
besoin de recharger les accumula- 
teurs, mais la machine fonctionne. 


[1 Xavier de La Tullaye 
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Tirage du Loto 

Programme pour TI 57 
Auteur Jacques Deconchat 
Copyright l'Ordinateur de poche 
et l’auteur 


00 
01 
02 
03 
04 
05 


0 

STO 2 
STO 3 
STO 4 
STO 5 
STO 6 
STO 7 

6 

STO 0 

2nd Lbl 1 
RCL 1 

2nd inv Log 
2nd Inv Int 
STO 1 


07 


©) JOUE CG N 


10 
1 
12 
13 
14 
15 
16 
17 
18 
19 = 
20 2nd Int 
21 STO 7 
22 GTO 2 
233 2nd Lbi 3 
24 2nd Pause 
25 2nd Dsz 
26 GTO 1 
27 R/S 
28 RST 
29 2nd Lbi 2 
2nd Exc 2 
2nd x=t 
GTO 1 
2nd Exc 3 
2nd x=t 
GTO 1 
2nd Exc 4 
2nd x=t 
GTO 
2nd Exc 5 
2nd x=t 
GTO 1 
2nd Exc 6 
2nd x=t 
GTO 1 
xæt 
GTO 3 


{| 
BRBBRENVNRRNRSS 


8RAS 
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Faites 


Les programmes de jeux 
utilisent très souvent 
des générateurs de 


nombres pseudo-aléatoires. 


Voyons comment 
mettre en œuvre 

ces derniers 

en fonction de différents 
types d’aléas recherchés. 


M Le générateur que nous avons 
retenu est loin d'être parfait, mais il 
a le mérite d'être très court. Sur la 
T1 57, il s'écrit : RCL 1 2nd INV Log 
2nd INV Int STO 1. Rappelons qu'il 
permet, partant d’un nombre initial 
(noyau) de la forme O0,xxxx d'en 
obtenir un autre qui servira à fabri- 
quer les nombres désirés et sera à 
son tour utilisé comme noyau pour 
le prochain tirage. 


En règle générale, il est intéres- 
sant de placer ce générateur en 
sous-programme, on y gagne en 
souplesse d'utilisation : le généra- 
teur fonctionne alors de la même 
façon que ceux qui sont utilisés en 
Basic, et qui sont appelés par la 
fonction RND. 


Le tirage d’un nombre entier de 1 
à 6 inclus, qui correspond au jet 
d'un dé, s'effectue ainsi grâce à la 
séquence SBR 1 x 6 + 1 = 2nd 
int, le sous-programme appelé par 
SBR 1 n'occupant que 6 pas : 2nd 
Lbl 1 RCL 1 2nd INV Log 2nd INV 
Int STO 1 INV SBR. Il devient, dès 
lors, très facile de tirer plusieurs 
entiers en appelant le sous- 
programme autant de fois que 
nécessaire, 


Dans un certain nombre de cas, il 
arrive que l'on ait à faire des tirages 


VOS jeux = 


Exemple d'exécution 
Taper : 0, 2546 STO 1 RST, puis 
R/S, on obtient : 40 14 43 12 34 38 


R/S, on obtient : 42 1 2 513 38 
R/S, on obtient : 37 23 45 5 12 35 


particuliers (tirage pair ou impair, 
tirage d’un nombre positif ou néga- 
tif, par exemple pour des jeux de 
déplacement...}). On peut alors avoir 
recours à certaines astuces, dont 
l’arrondi automatique : si l’on con- 
vient de représenter un tirage impair 
par 1 et un tirage pair par 0, on utili- 
sera le très court programme sui- 
vant : RCL 1 2nd INV Log 2nd INV 
Int STO 1 2nd Fix O R/S RST. On 
doit alors prêter attention à la façon 
dont s'effectue l'arrondi : sur TI 57, 
il n'affecte que le registre d'affi- 
chage. Si l'on a besoin d'utiliser les 
0 ou les 1 qui apparaissent à l'affi- 
chage, il faudra effectuer un vérita- 
ble arrondi. Sur les calculatrices TI, 
il existe une séquence qui effectue 
cette troncature : c'est la séquence 
EE INV EE. En incorporant cette 
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Poker aléatoire 
Programme pour TI 57 
Auteur Jacques Deconchat 
Copyright l'Ordinateur de poche 
et l’auteur 


00 5 

01 STO 5 

02 2nd Lbi 6 

03 RCL 6 

04 2nd Inv Log 

05 2nd inv Int 

06 STO 6 

07 x 

08 7 

09 _ 

10 2nd Int 

11 STO 0 

12 2nd Lbi 1 

13 RCL 1 

14 2nd Exc 2 

15 2nd Exc 3 

16 2nd Exc 4 

17 STO 1 

18 2nd Dsz 
GTO 1 


STO 1 


x 
1 
Ô 


2nd Inv Int 
SUM 1 


2nd x=t 
GTO 6 


+ 

RCE 1 

2nd Iny Int 
2nd Pause 
1 

inv SUM 5 
RCL 5 

2nd inv x=t 
GTO 6 
R/S 

RST 
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séquence dans le programme initial, 
on obtient : RCL 1 2nd INV Log 2nd 
INV Int STO 1 EE 2nd Fix 0 INV EE 
R/S RST : et les nombres qui appa- 
raissent à l'affichage peuvent réelle- 
ment être utilisés tels quels. 


Dans le cas de jeux où l’on doit 
obtenir des déplacements aléatoires, 
il se peut que l'on ait besoin de réali- 
ser des tirages arbitrairement positifs 
ou négatifs. S'il s'agit par exemple 
de réaliser un déplacement arbitraire 
entre —5 et +5, bornes comprises, 
on pourra fabriquer d'abord un 
entier entre O0 et 10 {bornes compri- 
ses), puis effectuer sur cet entier 
une translation de valeur —5. Le 
programme devient alors : RCL1 
2nd INV Log 2nd INV Int STO 1 x 
11 — 5 = 2nd int. 


La première partie du programme 
donne un nombre compris entre 0 et 
10, et la translation —5 assure que 
le résultat final sera bien compris 
entre —5 et +5 (ne pas oublier que 
la fonction Int, sur TI 57, ne fait que 
supprimer la partie décimale ; elle ne 
correspond pas à la fonction partie 
entière). 


Si l'on veut maintenant tirer une 
position au hasard dans un plan ou 
dans l'espace, il faudra adapter le 
procédé au résultat recherché (et à 
la place disponible en mémoire). 
Pour repérer par exemple la position 
d’un point dans un cube 10 x 10 x 
10, on peut utiliser trois nombres 
entiers x, y et z, compris entre 0 et 4 
et rangés dans trois mémoires diffé- 


Exemple d'exécution : 
Initialisation du générateur 
0.42161 STO 6 
Entrée des valeurs 
72184356 STO 1 
13524687 STO 2 
45216873 STO 3 
82167543 STO 4 
Entrée des couleurs 
0.1 SUM 1 | 
0.2 SUM 2 
0.3 SUM 3 
0.4 SUM 4 
Début avec RST, R/S 


3.4 

7.3 

R/S (2° tirage} 

8.3 

7.2 

3.1 Esoit une paire de huit 
6.3 

8.2 

etc. 


rentes. Mais il s’agit d'une solution 
coûteuse à la fois en pas de pro- 
gramme et en mémoires. Mieux 
vaut, dans la plupart des cas, se 
contenter d'un entier de trois chif- 
fres avec la convention : 1e chiffre 
= x, 2 chiffre = y, 3e chiffre = z, 
d'où le programme suivant : RCL 1 
2nd INV Log 2nd INV Int STO 1 x 
3 2nd INV Log = 2nd Int. Mais on 
peut également programmer : 
RCL 1 2nd INV Log 2nd INV Int 
STO 1 EE 2nd Fix 3 Inv EE. 


Cu RIEN NE VAUT UN 
BON PTIT LOTO..! 
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Faites vos 
jeux 
sur TI 57 


La seconde solution, plus courte, 
présente l’avantage d'un affichage 
assez facile à interpréter (il y a 3 
chiffres en permanence, car les 
zéros sont visibles) et à utiliser {il 
suffit de faire des multiplications par 
10). 


Comment 
—ne pas tirer deux fois— 
——le même nombre —— 


Bien d'autres problèmes peuvent 
se poser lors des tirages aléatoires ; 
l’un des plus délicats à résoudre sur 
une calculatrice est celui qui con- 
siste à vérifier qu’un nombre n'a pas 
déjà été tiré (cas du mastermind, au 
loto, du tirage de cartes, etc.}. Les 
faibles possibilités de mise en 
mémoire obligent fréquemment à 
chercher des solutions particulières 
adaptées au problème à résoudre. 
Les deux programmes présentés 
dans cet article (loto et poker) pré- 
sentent deux solutions différentes à 
ce problème du tirage sans répéti- 
tion : l’organigramme du jeu de loto 
{ci-contre) précise assez bien la 
structure généralement utilisée. 


Avec le loto, il s'agit d'obtenir un 
tirage de six nombres différents les 
uns des autres et compris entre 1 et 
49. La technique utilisée ici consiste 
à mettre le dernier nombre tiré dans 
la mémoire de test et à la comparer, 
par échange dans les mémoires, 
avec les tirages précédents : si 
jamais il y a égalité, on refait un 
tirage ; sinon, on poursuit les per- 
mutations de mémoires. 


——Le poker aléatoire —— 
——— 32 cartes et 
—— de 2 à 4 joueurs 


Le jeu a été conçu pour ressem- 
bler autant que possible à un poker 
normal, mais il n’est cependant pas 
possible ici de refaire un tirage : la 
première donne est définitive. Les 
cartes sont repérées par un numéro, 
de 1 à 8, et par une couleur, de 1 à 
4, ce qui permet toutes les possibili- 
tés de distribution d’un jeu de cartes 
normal. Faute de piace, il n’a pas 
été possible de confier au pro- 
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MIS& à, ére 
des mémoires 


{6 firages) 


Tirage dur rembre 
7, 1<n< 49 


Affichage de MF 


gramme la tâche de « brouiller » tes 
cartes ; on doit donc demander à 
une tierce personne de faire la mise 
en mémoire des cartes de façon 
arbitraire. 


La règle du jeu est simple : le pre- 
mier joueur prend la machine et 
frappe RST puis R/S pour entamer 
la partie (par la suite, il suffira de 
frapper R/S). Chaque joueur obtient 
ainsi cinq affichages consécutifs de 
la forme x,y où x représente la 
valeur de la carte (de 1 à 8} et y la 
couleur. On pourra bien entendu 
jouer seul contre la machine. 


La structure du programme n'est 
guère compliquée : le nombre de 
tirages est initialement entré en 
mémoire 5, puis décompté au fur et 
à mesure du déroulement de la par- 
tie ; on tire un nombre aléatoire qui 
précise dans quelle mémoire on doit 
choisir la carte qui est alors extraite, 


effacée de la mémoire et affichée 
avec sa couleur. Si la mémoire dési- 
gnée est vide, un test conduit à 
recommencer le tirage. 


Afin d'éluder le problème posé 
par le remplissage initial et arbitraire 
des quatre mémoires, il serait sans 
doute intéressant de tirer un nombre 
compris entre 1 et 32 et de signalér 
qu'une carte est « sortie » en lui 
affectant la valeur O où 9 pour éviter 
d'obtenir deux fois la même carte au 
cours d'une même partie. Vous pou- 
vez modifier le programme dans ce 
sens. 


1 Jacques Deconchat 
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PC-1251 : 


la table des codes 


Dans /’Op du mois dernier, 
nous avons soulevé 

un petit coin du voile 
sur le fonctionnement 
interne du PC-1251. 
Nous n'en connaissons 
pour l'instant 

que très peu de choses. 
Continuons à fouiner. 
Et n'oubliez pas 

de nous faire part 

de vos découvertes ! 


Œ Tout d'abord quelques premiers 
renseignements concernant |a 
mémoire de la machine. D'après ce 
que j'ai pu en voir, les octets dont 
les adresses sont comprises entre 
32 768 et 32 816 (8 000 à 8 030 en 
notation hexadécimale) correspon- 
dent à la mémoire de réservation. 
C'est d'ailleurs en cherchant de ce 
côté-là que l'on a pu jeter un pre- 
mier regard indiscret sur le PC-1251 
dans /’Op du mois dernier (page 36). 


“Piquons” 
le programme ——— 


Viennent immédiatement après, 
3 486 octets de mémoire vive. Pour 


instant, je n'ai pas cherché plus 


avant, et il reste beaucoup à décou- 
vrir pour établir une carte complète 
de la mémoire. 
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Cela dit, en « peekant » à partir 
de l'adresse 32 816, on obtient les 
codes qui représentent le pro- 
gramme se trouvant en mémoire. 


Après avoir fait NEW en mode 
PRO, entrons la ligne 10 : PRINT 
« A», et regardons. Les octets 
32817 et 32818 contiennent le 
numéro de la ligne, c'est-à-dire 10, 
représenté sous une forme qui n'a 
rien d'évident : PEEK 32 817 nous 
retourne 224 et PEEK 32 818 nous 
retourne 16. En fait le code 224 indi- 
que que le numéro de la ligne n'a 
que deux chiffres et il peut être con- 
sidéré comme un zéro. Le code 16, 
quant à lui, est la traduction en déci- 
mal du numéro 10 qui a été inter- 
prété comme un nombre hexadéci- 
mal. 


Si la seule ligne de programme en 
mémoire avait été 999: PRINT 
« À », nous aurions recueilli 233 et 
153 aux mêmes adresses 32 817 et 
32 818. Nous avons vu plus haut 
que le code 224 équivalait à un chif- 
fre des centaines égal à zéro ; le 
code 233 que nous trouvons mainte- 
nant vaut bien 9: 233-224-9, 
c'est le chiffre des centaines du 
numéro de la ligne. 


Quant au code 153 qui se trouve à 
l'adresse 32 818, on doit lui faire sui- 
vre le même traitement que le code 
16 de l'exemple précédent : il cor- 
respond bien aux deux derniers chif- 
fres du numéro de la ligne, c'est la 
traduction en notation décimale du 
nombre hexadécimal 99 ; 99 (base 
16) vaut effectivement 153 (base 
10}. 


Si nous passons maintenant à 
l'adresse suivante (PEEK 32 819) 
nous trouvons le code 193 qui est 
celui de l'instruction PRINT. Le À se 
trouve en 32 821 (code 81}, entouré 
par 5es guillemets (code 18) inscrits 
en 32 820 et 32 822. 


En « pokant » successivement à 
l'adresse 32 821 — où est mémorisé 
le À de notre programme tes 
valeurs comprises entre Ô et 255, et 
en listant ensuite le programme pour 
voir le résultat obtenu avant de 
poker la valeur suivante, j'ai essayé 
d'obtenir tous les caractères possi- 
bles. Même s'ils ne sont pas tout à 
fait complets, les résultats sont inté- 
ressants. On trouve par exemple à 
vingt-deux reprises des caractères 
graphiques assez étranges, des 
signes spéciaux tels que la matrice 
entièrement noire ou le tilde {v), le 
curseur, mais aussi tous les noms 
des fonctions du Basic. 


—— ASCII ou non ? 


L'ensemble de ces renseigne- 
ments est récapitulé dans le tableau 
que l’on trouvera à la page suivante. 


On s'aperçoit ainsi, entre autres 
choses, que le PC-1251 ne travaille 
pas avec le code ASCII : il code la 
lettre À 81 et non pas 65. Les fonc- 
tions ASC et CHRS$, qui utilisent 
pourtant bien le code ASCII, effec- 
tuent donc des conversions sur ie 
code des caractères. 


[] Gilles Mabille 
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St ON ALLAIT 
JOUER Av 
NEÏSCAT ? 


Le jeu de Neiscat 


Ne soyez pas surpris si 
vous ne connaissez pas le 
jeu de Neiscat : 

il vient tout juste 

de voir le jour. 

Pourtant la 41 CV 

le connaît déjà... 


Œ Vous trouverez désormais avec 
votre HP 41 CV un adversaire de 
taille {jusqu'à 296 registres peuvent 
s'avérer nécessaires} et assez habile. 
Le Neiscat se joue à deux, sur un 
damier hexagonal (fig. 1) constitué 
de cases elles-mêmes hexagonales, 
au nombre de 19, 37 ou 61 selon 
que vous choisissez de jouer sur un 
damier de 3, 4 ou 5 cases de côté. 
Chaque joueur dispose en nombre 
illimité de pions à double face. La 
face supérieure porte l'un des numé- 
ros 1, 2 ou 3, la face inférieure étant 
elle de la couleur du joueur (noir ou 
blanc). 


Les deux joueurs vont alternative- 
ment poser sur n'importe quelle 
case libre du damier, face numéro- 
tée visible, un pion, en vue de réali- 
ser des alignements « 1-2-3 » selon 
l'une quelconque des six directions 
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possibles (fig. 1). On peut « con- 
clure » un tel alignement indifférem- 
ment par un pion n° 1,2ou3(1si2 
et 3 sont déjà posés, 2 s'il est enca- 
dré par 1 et 3, ...). Un pion posé 
appartient au jeu et peut donc être 
utilisé par chacun des deux joueurs 
pour réaliser un tel alignement. 


Toutefois, il fallait bien une 


exception (!}, le pion de conclusion 


Fig. 1 

Dimension 4 : plan du jeu 
avec deux exemples de séries 
terminées. 


d'une série, qu'il s'agisse d'un 1, 
d'un 2 ou d'un 3, est retourné, lais- 
sant apparaître la couleur du joueur 
qui l'a posé, et est ainsi neutralisé : 
il ne peut plus intervenir dans la réa- 
lisation d'un autre alignement. Le 
score marqué par le joueur est égal 
à la valeur du numéro porté sur le 
pion de conclusion de la série. 
Même si plusieurs séries sont con- 
clues simultanément, on n'en comp- 
tabilise qu'une. 


—— Ne faites pas —— 
le jeu 
——— de l'adversaire 


Il peut sernbler facile de réaliser 
de tels alignements, il n'en est rien 
car, par ailleurs, /e numéro du pion à 
placer vous est imposé ! Les deux 
adversaires doivent jouer dans 
l'ordre des pions numérotés 1, 2, 3, 
1, 2, 3... Ainsi les joueurs A et B 
poseront-ils successivement : 


joueur A 132... 
joueur BI 213... 


et la difficulté devient alors qu'un 
pion posé peut faire immédiatement 
le jeu de l'adversaire ! 

Encore un détail à connaître: au 
départ du jeu, la case centrale est 
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Le jeu du Neiscat 
programme pour HP-41 CV 


Auteur Robert Pulluard 
Copyright l'Ordinateur de poche et l'auteur 


CAT 
LBL'HSCAT 
END, 1225 8YTES 
PRE “NSCAT” 


BieLBL “NSCAT" 

“VoC" CLRG CF 46 4 
DIM? 66"  PROMFT 

ST 14 STO 85 CHS 
11,811 + STO #E 
38,929 RCL 14 + LASTX 
LEZ / + ST0 #7 


226LBL 06 
REL 86 ST+ 97 1 


26+LBL 41 

STD IND 47 156 47 
GT0 01 DSE 86 RDN 
DSE 95 GT 88 .999 
ST+ 96 RCL i4 1 - 
STO #5 


4goLBl 11 
RL 96 ST+ 67 : 


44e Bl 12 

STO IND @7 156 47 

GTO 12 1SG 86 DSE 95 
GTO {1 18 STD 89 CHS 
STD 12 1 STO 18 

ST0 98 CHS STQ 11 11 
STO 88 ST- 13 RL 14 
+ 34 + 15 STd IND Y 
SF A1 CF 62 CF 93 

CF 29 SF 97 8.811 

ST0 28 CLX “PRET” 
TOHE 5 


79#LBL 15 

FIX 6 CF @S CF @6 
CF 22 PROMPT F5? 22 
GTO #2 FS7 67 GT0 16 
CLX STO 28 ST 21 
CF IND 88 RCL 88 3 
DSE Y RDN ST0 48 

SF IND 40 RCL 14 

XC> 17 STD 16 GTO 18 


183+LBL 82 

#=07 GTD 28 38 + 
ST0 81 RCE IND A4! 

RCL 18 "ERR:" xxY? 
GTO i5 2 RL 88 tx 
RHB RCL 18 - ST+ X 
ST+ EXD 81 


122eLBL 18 

SF 98 CF 05 CF %% 
CF 97 CF BB RCL 28 
510 87 


138+L8L @4 

RCL 88 38 + XEU [ND x 
FS?C 85 OCTO 27 1ISG 97 
GTO 64 4 FS7 82 3 
F5? 83 5 STO 86 

RCL 28 x=97 GTO 13 


RCL IHD 28 RCL 18 X=Y? 
GTO dé RCL 21 *x=4? 
GTO 33 RCL END 21 

RCL 19 %2#v2 OCTO 13 


159+LBL 96 
RCL 2 STO IND86 3 
ST+ 86 SF IND 86 


L65+LBL 13 

CLX STO 28 STD 21 
FC? 83 GT9 37 STD 983 
24,821 STD 86 


1744LBL 3$ 

Cix 510 15 RCL IND 06 
X=972 GTO 36 570 61 
RCL 28 STO 67 


183eLBL 29 

KEQ 18 2 Ke#Y? GTO 85 
RCL @1 RCL IND 97 + 
xt} A1 STD 25 RCL 28 
xt) 47 STD 26 


196eLBL 38 

HEO 17 6 Xev? GTD 96 
RCL IND 87 RCL IND 26 
CRS X=Y? GTO 46 

REL 81 STO 63 

RCL IND 26 STt+X + 
KC> 28 STD 21 GT 18 


2144LBL 06 

1$G 87 GTO 38 REL 26 
STO 87 RL 25 x€} 81 
STD 15 RCL IND 87 
ST+ X + STO 28 


226#LBL 85 

ISG 67 GTO 29 RCL 15 
x=87 STO IND 86 X#8? 
STO 93 


234+LBL 36 
DSE 86 GTD 35 


237eL8L 18 
REL 03 %X#07 SF 46 


2414LBL 37 

FS9C 88 RCL AS FS2 8 
RCL 84 FS?C 86 RCL 83 
X2:8? GTO 26 ST 8 

CF 84 KXEO 25 RCL 6! 
GTG 23 


259eLBL 31 

KEG 17 STD 82 -8 Kx=Y’ 
SF 8j RDN 6 xrŸ? 

GTO 85 RCL 41 

RCE IND G7 ST+ X + 
ST0 83 SF 66 


e71eL8L @S 

REL 82 -14 X#Y? RTH 
RCL 81 RCL IND 87 + 
STO 85 SF 88 RTH 


PAGE 40 - L'ORDINATEUR DE POCHE 


2824L8L 32 
KEQ 18 STO 82 
SF 45 RCL 82 © x+Y? 
CTO 82 RCE 81 RL 22 
Key? GTO 82 x'> 23 
STO 24 RDN ST 2 


18 X=Y/ 


Jô8eLBL 62 

REL 82 4 X#v? RTN 
REL 81 RCL IND 87 + 
RCL IND X RCL 18 x=v? 
GTO 99 RCL 81 
RCL INB @7 - Sf0 2 
316%L8L 65 

ROL 2 ST0 84 SF 47 
RTH 


3214181 33 

KEQ 17 STO 82 4 4=v? 
$F 93 RCL O2 -2 keV? 
RTH REL 81 RCE INR 87 
+ STO 84 SF 87 RTN 


337eLBL 26 
CF @A XEQ 25 


3486LBL 16 

RCL 14 RCL 88 +* 19 + 
F592€ 97 GTO 23 CLX 
610 83 STO0 44 STO 18 
ST9 19 ST 24 STO 21 
STO 23 STO 26 41 

ST6 4j RCL id .ÿ22 + 
4i.4i9 + STO dé 


365LBL 28 
RCL INR 8 RCL 18 xev? 
GTO 21 RCL 81 28 - 
CLA ARCL X “H?- AVIEM 
CLX STO 62 RCL 28 

STO 67 


3814L8L 17 

RCL 61 RCL IN 87 + 
ST+ L RCL INDK x=97 
GT0 67 REL INDL - 


391eLBL 87 

F5? 69 RIN 53 + 
REG IND X ST+ @2 

156 97 GTO 17 F5? 83 
GTO 22 8.81 ST0 87 


494+LBL 18 

RCE 81 RCL INT @7 + 
RCL 81 LASTX - 

RCL IHD Ÿ RCL INBY + 
F6? 88 RTH 69 + 

KEQ [ND X ST+ 82 

156 47 GTO 18 GTO 22 


423+L8L 53 
CLA RTN 


426+L8L 54 
427eLBL 69 
428eLBL 56 
429+LBL 68 
438eLBL 78 


431+LRL 72 
4320LBL 34 
4334L8L 53 
434+LBL 49 
435eLBL 41 
436+LRL 67 
437eLBL 65 
438eLBL 61 
439eLBL 75 
44BelBt 91 
44ieiBl 39 
CLX RTK 


444eLl 71 
CLX FC? 92 RIN RCL R1 
ST 25 CLX RTN 


4320L8L 68 
“2 F$7 03 CL4 RTN 
457+LBL 47 
458eLBL 77 
439+LBL 79 
46B6LBL 93 
CLX F5? 92 -2 RTh 


465+LBL 51 

CLX FC? 83 RTN ROL 81 
REL IND 87 + RC 18 
K2Y? STO 19 RDN 

STA 18 RCE 89 RTK 


479+LBL 39 


CLX F57 81 -5 RTN 


484eLBL 59 

-6 F57 92 -2 FC? 81 
RTN RCL IND 97 ST+ x 
RCL 81 + RCL IR X+#Y? 
STO {9 RDN ST 18 
RCL 89 RTK 


SAILEL 57 
REL 89 Ses X F5 81 
RCL 12 FS7 82 24 RTH 


J496LBL 45 
2 FS57 82 -6 FS? 83 
REL 18 RTN 


Si6eLBE 73 
CLR F5? 92 -15 RTN 


SeteLBL 85 

CLX FC? 92 RIN 

RCL IND 87 RCL 81 + 
RCL IND X RCL 18 - 
x=0? GTO 83 RÉEL üt 
RCL IND 87 - Ft 


5374BL 93 

RDH RCL 18 XzY? 
STO 19 RDN ST 18 2 
RTH 


J4seLBL 87 
28 F5? 81 13 RTK 
S516LBL 76 
CLX FS? @2 -2 RTK 


S56+LBL 22 


RCL 91 RCE 84 RCL 83 
X=6? GTO i4 RDN 

REL @2 KV? GT 21 
STO 84 X#V2 GTR 14 
RDN XEQ “ALER" 

X8? GTO 21 


575+LBL 14 

RCL à REL 25 x#Ÿ? 
STO 26 REN STC 83 
RCL 18 ST 24 RCL 
ST 21 


397+LBL 

REL ig CEX 
STD 18 [SG 86 
GTO °8 #=8? 
GTG 62 XC} 23 
STO 24 


6ALeLBL 92 
REL 03 


643eL8L 23 
X=97 GTN 28 STU 81 
SF 88 RC 28 STI 87 


619eLBL 38 

FS? @2 XEQ IR F2? 82 
KEQ 17 FS2 81 -83 

F6? 92 18 F5? 83 4 
K=Y? GT0 24 ISG 07 
GTO 38 CF @A 2? ACL 68 
YTX RND REL 18 - 
ST+ X ST+ IND 81 ELA 
AREL 88 “+: " XEQ 25 
RCE A1 3 - ARCL K 
TONE 5 GTQ 15 


644 Pl 24 

CF BB RCL 88 ST+ 1? 
CF IND 88 CLX £TO 28 
ST0 21 STO IND 81 CLA 
ARCL AB “+: * KED 25 
RCL Qt 38 - PEL x 
XEQ D TOME 9 TOME 8 
GTQ 15 


665eLBL 25 

CF IND 88 RCL 64 

RCL 18 + 4 MO x=87 
RCL 18 STO 88 

SF IND 44 RTK 


677eL8L 27 

CF 86 CF 07 CF 45 

FC? 22 GT 26 RCL 48 

ST+ 16 CLX STO [ND @1 
RDN “OK” KEQ D TONE à 
PSE PSE CLD GTO 26 


6956L8L 28 

CF END 88 *FIN° 
TONE 5 STOP 
GTO "NSCAT” 


xEe D 


742+LEL D 
“+ S=" ARCL 16 
ARCL 17 AVIEM 


+. 
END. 


RleLRL ALER” 
RCE 29 PE # 5 Yrx 
FRC ST0 29 ENT 
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Lignes du programme 


1à 78 Initialisation 
79 à 335 Analyse du coup adverse 
336 à 601 Analyse du jeu 
602 à 707 Jeu d'une case 


occupée par un pion de valeur 3 
pouvant par la suite servir de base à 
la constitution de séries gagnantes. 
H y aura donc toujours au début de 
la partie un nombre de cases libres 
multiple de 6, ce qui équilibre au 
mieux les chances des deux joueurs. 
La partie se termine lorsque pius 
aucune case n'est libre ou lorsque, 
d'évidence, aucune série ne peut 
plus être réalisée. 


Le programme, une fois introduit 
dans la HP 41, doit être complété 
par la routine ALEA ou toute autre 
qui génère un nombre pseudo- 
aléatoire. On le lance par XEQ 
« NSCAT » et la dimension du 
damier de jeu est demandée : de 1 à 
5 cases de côté. Les valeurs 1 et 2 
sont triviales ; la 3 permet de « se 
faire la main » : et les dimensions 4 
et 5 sont les plus intéressantes. Par 
défaut d'introduction, le programme 
choisit la dimension 4. 


Après avoir établi son plan de jeu, 
le programme stoppe sur le message 
« PRET » : à vos pions ! Si la HP 
doit commencer, faire R/S. Sinon, 
entrez les coordonnées de la case 
que vous jouez avant de presser 
R/S. Rappelez-vous que vous posez 
un pion d'une valeur déterminée : 
tout au long de la partie, la HP indi- 
quera ce numéro au moyen des indi- 
cateurs binaires 1, 2 et 3 (drapeaux). 
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Le Jeu 
De Neiscat 
pour HP-41 CV 


Vous ne pouvez pas « tricher », le 
message « ERR : » indiquerait que 
vous jouez une case déjà occupée. 
En revanche, vous pouvez faire 
jouer la HP pour vous ou simple- 
ment contre elle-mêmè en pressant 
R/S sans introduire de coordonnées 
de case. 


Comment déterminer les coordon- 
nées d’une case ? La méthode est 
explicitée à la figure 2 : la case cen- 
trale est ici la 44, la 33 se trouve 
immédiatement au dessus... 


Une fois votre coup mémorisé, la 
HP va en examiner les conséquen- 
ces (drapeau 0), éventuellement affi- 
cher un résultat (score) et, enfin, 
passera à l'étude de sa riposte. Dans 
certains cas, celle-ci sera immédiate, 
mais, en général, elle examinera 
tout le plan de jeu, case par case. 
Pour vous faire prendre patience, 
ele affiche les coordonnées des 
cases examinées : « XY ? ». 


Le temps de réponse est globale- 
ment, dans le cas le plus défavora- 
ble, de 3 minutes en dimension 3, 
6 mn en 4 et 10 mn en 5. Mais, 
encore une fois, en moyenne les 
coups sont plus rapides. 


Le jeu du poquette est signalé par 
un bip et affiché : « n° de pion : n° 
de case ». Par exemple, « 2:35 » 


signifie que la HP pose un de ses 


Fig. 2 : Les deux directions 
obliques descendantes 
définissent les coordonnées 
de chaque case. 


Le programme 


En ce qui concerne le programme 
lui-même, il occupe 174 registres et il 
faut lui ajouter une routine générant 
un nombre pseudo-aléatoire 
{& ALEA ») compris entre 0 et 1. De 
nombreux registres de mémoire sont 
sollicités : 97 en dimension 3, 119 en 
4 et 141 en 5; mais la plupart 
d'entre-eux demeurent... inutilisés 
{c'est le cas de 52 registres en dimen- 
sion 4) ! Près de 60 % de déchet en 
moyenne, n'est-ce pas horrifiant ? Le 
désavantage d'une gestion plus poin- 
tileuse des mémoires serait de gaspil- 
ler le temps d'analyse. Si le cœur 
vous en dit... 

Le codage des cases est ainsi fait : 
0 {hors jeu), 1 (case libre), 3 (n° 1), 7 
{n° 2} et 15 {n° 3}, selon la formule 
2 Atn° pion + 1) - 1. La case 
numéro XY correspond au registre 
n° 30 + XY. Enfin, signalons que le 
cœur du programme, là où sa straté- 
gie s'élabore, est situé aux lignes 422 
à 554. 


pions n° 2 dans la case 35. En 
même temps, l'indicateur de numéro 
de pion (flag) est avancé, vous indi- 
quant quel pion poser à votre tour : 
pour jouer, entrez ses coordonnées 
suivies de R'S. 


Toute partie 


doit se terminer —— 


Une série conclue est annoncée 
par une petite musique et le mes- 
sage « S = s1i- 52 » où s1 est votre 
propre score et s2 celui de la HP. Si 
vous avez fait jouer la HP à votre 
place, les scores sont bien sûr inter- 
vertis. La conclusion d'une de vos 
séries est annoncée par un message 
semblable mais précédé de « OK » 

Si, à la fin d'une partie, la HP 
détecte bien elle-même qu'il n'y a 
plus aucune case libre, il faut en 
revanche lui indiquer, quand aucune 
série n'est plus réalisable, qu'elle 
doit conclure. I suffit pour cela 
d'introduire O0 à la place des coor- 
données d'une case : le message 
« FINS = . » donne le score 
de fin de partie. 


F Robert Pulluard 
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Othello-Reversi 


Comment jouer 


sans toucher 
aux pions 


(ZX 81) 


TA 03 


Damier électronique pour Othello-Reversi 


Programme pour ZX 81 
Auteur Jacques Deconchat 


Copyright l'Ordinateur de poche et l'auteur 


| 
MR tre 
Sie ft 
ss 
NO Qums 
x HAT 
FA 


ca 

en 

CES 
Er 
s* 


LET K=E 
PRINT AT A+ 
NOT K 
INPUT Et 

IE NOT ti FH 


LU RW 
EG Gi 
q 


«7 


Z 

Le] 
GER FU 
19: 


INPUT 4 
LET H=PX 


LEF H=NOT P 
LET T=£tt 

7 = 
LÉT F=iP+IN 
F à És _ANC EE « 
LET ={PF2zT 
HO Pi: Sion 
ET R$=t"x" 


+1 

RINT RT TT. 
ET T=T+F 
ET R 

BENT ee 


O1 1 DEA UT de 8 Ci Ci 

F0 10 4 6 Eù Gi JA COUT 
” 
mi 
PI 


qi 
nrraar 


SÉSCQDE ” 
HN GaoTo CODE 
MEXT P 
IF NH THEN & 
LET K=ABS 
EOTO CODE " 
IF {C=CODE 


DE pere LT 9 Gin eu 
Bts Ca DIR TM AO ZX O LS SEP LA 
Hi 


CREER EU ES UE RARES ES 


Q 
m 


(WEET) 


FRINT R$ 

HU OANED €T 
(C=CODE ‘’X" 
H GOTOQO CODE “PI 
ESS JF NOT & OR 
EE “"USR _" 

238 LET S=R+NCQT 
2838 LET H=-HasNQOT 
242 GOTO CODE 
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fs 
1) 


U 
al 
9-4 
H 


3 


DC 
D 


i 
“ét AND NOT Ki THEN LET U 


À 
FO PI P:PFIAT P,MNO 


HR CRODCIAT A+8.,R: 


RAR: 'X" AND K: 7 


EN COorTQo CODE ” 8 


CODE “ 

x 

T FI OR FaPI+PI+ 
=pI+Pii 

NT FI+INT FXI-ir 
AND S=Bi+("0" 
R:RS 


sh; 
(PEER 1S280+2S6 *% 


Q" on C=<ORDE “XX 
“* STERF 


QrTo CODE “," 
# —Rt 


CI 


fo AND_KI Of 


C2<C0ÈE ‘© AND K 
AND NOT Kil THE 


& THEN GSOTO CQE 
K 
<° 


mn 


APS83 


[= S PRE e 


Le programme 

qui vous est proposé 

ne sera pas 

un adversaire pour vous, 
mais il vous permettra 
de disputer des parties 
avec vos amis 

dans de meilleures 
conditions 


B Le jeu d'Othello ou de Reversi est 
l’un des plus pratiqués sur les ordi- 
nateurs individuels ; la raison en est 
principalement qu'il est possible 
pour ce jeu, même avec un espace- 
mémoire relativement limité, de 
trouver un algorithme de bonne 
qualité qui permet à l'ordinateur de 
se comporter en partenaire valable. 
Certains de ces algorithmes ont été 
déjà présentés dans diverses revues 
et ce n'est pas cet aspect du jeu qui 
nous intéressera ici, mais plutôt 
l'aspect pratique : il se trouve en 
etfet que ce jeu oblige à manipuler 
beaucoup de pions, ce qui peut être 
assez pénible à la longue. 


Le programme proposé est un 
« damier électronique » : il vérifiera 
d'une part la validité du coup joué, 
en le refusant s'il n'est pas con- 
forme, et il se chargera d'autre part 
de retourner tous les pions mis en 
cause. Il a été simplifié au maximum 
de facon à « tenir » dans un ZX 81 
1 Ko. On jouera dans ce cas sur un 
damier 6 x 6. Cela dit, le programme 
est entièrement paramétré, ce qui 
fait que vous pourrez sans modifica- 
tion l'utiliser en 8 x 8 si votre Sin- 
clair est doté d'une extension de 
mémoire. 


Pour réduire au maximum la place 
occupée en mémoire, il a été néces- 
saire d'utiliser un numérotage parti- 
culier des lignes de programme qui 
passent de 66 à 200 : on profite ainsi 
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de la possibilité offerte par le ZX 81 
de remplacer un nombre compris 
entre 0 et 255 par le code du carac- 
tère correspondant. Cette facon de 
faire rend l'interprétation plus diffi- 
cile, mais elle permet d'économiser 
quelques octects. 


Dans un même souci d'économie, 
les coups joués ne sont pas enregis- 
trés dans un tableau : c'est l'écran 
du téléviseur qui sert de mémoire, et 
l'exploration des cases est faite 
directement sur l'écran {lignes 203 
et 206 du programme). Le contrôle 
de validité du coup et le retourne- 
ment des pions sont effectués aux 
lignes 224 à 242. Ce sont les dra- 
peaux W et S qui interviennent, W 
prenant la valeur 1 si le coup est 
reconnu valide, et S prenant la 
valeur 1 ou 2 selon qu'il faut inscrire 
des © ou des X. 


Fin de partie 

les“ x” 1X*00000 
EXXO0000 
GxXX000 
4ARkXO0G 


l'emportent 
de peu. 


EXANXOO 
EXXXXKX 


Si, à un moment donné, aucun 
coup n'est possible pour l'un des 
deux joueurs, il suffit de taper 0 en 
première coordonnée pour passer le 
tour. 


Les lignes 8 à 20 correspondent à 
la mise en place du damier, selon la 
valeur de A entrée au départ (A = 3 
pour un damier 6 x 6, 4 pour un 8 
x 8, etc.}. La ligne 26 sert unique- 


ment à rappeler par la présence d’un 
symbole X ou © quel joueur doit 
intervenir, et les lignes 41 à 212 per- 
mettent l'exploration suivant les huit 
directions partant du dernier pion 
joué {le grisé en ligne 41 correspond 
à graphic shift A). 


Il ne vous reste plus qu'à trouver 
un partenaire pour disputer une par- 
tie (1). Vous êtes sûr au moins qu'il 
ne pourra pas tricher et que ni l'un 
ni l’autre vous n'oublierez de retour- 
ner certains pions. Enfin vous êtes 
tout à fait tranquilles : aucun risque 
d'égarer ne serait-ce qu'une pièce 
du jeu. 


[1 Jacques Deconchat 


{1} Les règles du jeu ont été publiées à la 
page 43 du n° 10 de l'Op. 


Quand la TI 59 
prépare la monnaie 


Lorsqu'il faut régler 
plusieurs personnes 

en espèces, à l’occasion 
d'une paye par exemple, 
il ne suffit pas d’avoir 
assez d'argent liquide. 

Il faut aussi s'assurer 
que l’on pourra 

faire l'appoint. 

Avec le programme 
proposé ici, c'est 
l'affaire de quelques 
minutes. 


M | y a encore beaucoup de petites 
entreprises employant quelques 
dizaines d'ouvriers que leur directeur 
paie en argent liquide. À la campa- 
gne, la rétribution des travailleurs 
saisonniers s'effectue souvent de la 
même manière. Or la préparation 
des enveloppes de paye n'est pas 
une tâche aussi facile que l’on pour- 
rait se l’imaginer. On doit en effet 
avoir — sur sa table — toute la 
monnaie nécessaire pour faire 
l'appoint. 
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La plupart du temps, il a été 
demandé à la banque de préparer la 
monnaie, soigneusement calculée, 
feuille de paye après feuille de 
paye... Effectué à la main, c'est un 
calcul parfois très long et it peut arri- 
ver que des erreurs viennent se glis- 
ser insidieusement, faussant le résul- 


tat final. Un ordinateur de poche (ici 
une TI 59) peut calculer au centime 
près la répartition de cette monnaie 
grâce à un petit programme qui 
s'avèrera rapidement indispensable à 
tous ceux qui en ont professionnel- 
lement l'utilité. 

Après avoir introduit au clavier le 
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programme proprement dit {pas 000 
à 122}, on le sauvegardera sur la 
première piste d'une carte magnéti- 
que en groupe 1 {1 2nd Write). Puis 
on stockera dans les mémoires O1 à 
13 la valeur des différentes coupures 
et des différentes pièces en circula- 
tion, depuis le billet de 500 FF (500 
STO 01) jusqu'à la pièce de 5 centi- 
mes (0,05 STO 13} comme indiqué 
dans le tableau ci-contre. Pour ne 
pas avoir à réintroduire ces données 


Préparez la monnaie 
Programme pour TI 59 
Auteur Pierre Roumestan 
Copyright l'Ordinateur de poche et l'auteur 
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Valeurs à affecter 
aux registres 01 à 13 


500 STO 
200 STO 
190 STO 
50 STO 
20 STO 
10 STO 

5 STO 


01 
02 
03 
04 
05 
06 
07 


2 STO 08 
1 STO 09 
0.5 STO 10 
0.2 STO 11 
0.1 STO 12 
et enfin. 


0.05 STO 13 


To eee I € 


1 Pire 


Le] 


4 
+ 
Éeol 
ti 


“] 


cm ta ei FL 


E2 


md LU eh 
CF ht LT 


me 


4 
di 


.. bb td pos pu 


à chaque paye, on a tout intérêt à 
les enregistrer elles aussi sur l'autre 
piste de la carte magnétique en 
groupe 4 (4 2nd Write), On conserve 
ainsi sur une seule carte le pro- 
gramme et les données qui lui sont 
utiles, 


Un exemple suffira pour faire 
comprendre l'utilisation du pro- 
gramme. Supposons que l’entre- 
prise ait à verser les rémunérations 
nettes suivantes : 


1/ 3 175,75 5/ 2 998,25 
2/ 2 743,20 6/ 1 882,85 
3/ 2 618,60 7/ 2 763,30 
4/ 3 091,15 8/ 5 118,05 


On initialise avec une pression sur 
la touche E, ce qui remet à zéro les 
registres 16 à 33 et place 1 dans le 
registre 17. L'affichage indique alors 
1, ce qui doit être interprété comme 
« entrer la première somme à ver- 
ser », soit 3 175,75. Une fois que ce 
premier nombre est introduit, on 
appuie sur À et, après 20 secondes 
environ, l'affichage indique 2 
(« entrer la deuxième somme... »). 
On entre alors la deuxième somme, 
puis on appuie sur À, etc. 


Quand on en a terminé avec 
l'introduction des différentes rému- 
nérations, on presse sur B pour en 
obtenir le total qui se trouve stocké 
dans la mémoire 16 (ici, on trouvera 
24 301,15). 


Pour connaître maintenant le 
détail de la monnaie, on presse sur 
C, puis sur R/S après chaque affi- 
chage. Avec notre exemple, on 
obtiendra : C, affichage de 46, ce 
qui signifie que l'on aura besoin de 
45 billets de 500 F. Une pression sur 
R/S et la calculatrice indique 5 (5 
billets de 200 F), et l’on continue. 
R/S, 4 {bilfets de 100 F) 

R/S, 4 {billets de 50 F) 

R/S, 6 {billets de 20 F) 

R/S, 4 (billets ou pièces de 10 F} 
R/S, 4 (pièces de 5 F) 

R/S, 6 (pièces de 2 F) 

R/S, 6 (pièces de 1 F) 

R/S, 3 (pièces de 0 F 50) 

R/S, 5 {pièces de 0 F 20) 

R/S, 4 (pièces de 0 F 10) 

R/S, 5 (pièces de 0 F 05) 


L'ensemble de ces résultats se 
trouve, dans l'ordre, rangé dans les 
registres 21 à 33. Et en effet, en 
pressant sur la touche D, c'est-à- 
dire en appelant le programme qui 
recalcule la somme totale à partir du 
détail des espèces, nous réobtenons 
bien 24 301 F 15 : chacun aura son 
dû. 

EL] Pierre Roumestan 
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Le 
valet noir 
(alias 


Black 


Jack) 


sur 
FX-602 P 
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Se ruiner au Black Jack : 
un véritable luxe ! 

Avec ce programme, 
heureusement, 

cela ne vous coûtera rien. 


M Évidemment, vous n'aurez ni 
couleurs ni graphismes sophistiqués, 
seulement des chiffres et des lettres, 
mais vous réaliserez tout de même 
de belles parties. 


Votre machine s'est réservée le 
beau rôle, c'est-à-dire celui de la 
banque ; elle joue donc contre vous. 
À tour de rôle, vous tirerez autant 
de ‘‘cartes'’ que souhaité (en fait il 
s'agira de nombres compris entre 1 
et 11}, et vous chercherez à ce que 
la somme de leurs valeurs successi- 
ves se rapproche le plus possible de 
21 sans surtout dépasser ce nom- 
bre. Cette dernière restriction est 
très importante car si vous venez à 
dépasser 21, vous avez perdu la par- 
tie. | 

Vous pouvez donc demander une, 
deux cartes, ...et estimer vos chan- 
ces d'atteindre un total de 21 en en 


tirant encore, au risque, bien sûr, de 
tout perdre. 


Dans l'hypothèse où vous n'auriez 
pas déjà perdu en dépassant 21, la 
banque-poquette va jouer contre 
vous jusqu'à ce qu'elle dépasse soit 
votre score {vous perdez), soit 21 
(elle perd). En cas d'ex-aequo sur 
une partie, celle-ci est rejouée. Enfin 
le jeu se déroule en une manche de 
cinq parties. 


Chargez le programme dans les 
zones P4 et P7 à P9 et lancez l'exé- 
cution par P4. La 602 demande 
‘carte 7", répondre ‘oui: EXE. 
Une autre ? rien de plus facile : 
EXE. Pour passer la main à la ban- 
que, si vous estimez votre total con- 
venable, faites 1 suivi de EXE. Le 
poquette tirera (sans tricher) ses 
propres cartes. Après cinq parties, 
la 602 se permettra d'émettre un 
jugement sur vos qualités de joueur. 


La liste du programme est accom- 
pagnée de commentaires qui en 
décrivent l'architecture et devraient 
vous permettre de l'adapter facile- 
ment à un autre micropoche. 


CL] Joël Becker 
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LA, 


Le valet noir 
(alias Black Jack) 
sur FX-602 P 


Le valet noir 
Programme pour 602 P 

Auteur Joël Becker 

Copyright l'Ordinateur de poche et l'auteur. 


PROEPAN LIST 
Meg-19,F-1F Slsters 


“AC S Mingÿ présentation du jeu 

“BLACK JACK : EKE=OÙ 

L ; 1 EXESHON ? He PT 
PAUSE 18 Minis 


1” A Hing5 mise à 0 des mémoires 10 à 19 
tirage d'une carte | M5 (n) où sont gardées les cartes 
HRGS - 19 = x°û qe 


si oui, P8 


Li 
Æ 3 
15 
6 
re + 
Le =] 
3 
[= 73 
1 
Vi —— 


sommation du score 


SCT = EE à affichage de la carte ve (llsteps 

ca Le r tee F8 __ tirage des cartes 
xà î 

074 ° {8 Mings 


i > a : L 
LISE #22 para nombre aléatoire de 1 à 11 


RANI 
Ag x il = INT +: 
= = Ninê4 


LUS 
“PERDU : argi ” 
40109 


LBL4 ee EL3 
“ dd » sinon l'afficher = Re: : 
LUE + ol et carte suivante 6 Li HR si égalité, retirer 
EL? IND MPBS x=6 GOTOI _ si mémoire n vide, l'y mettre 


1 4485 60703 __incrémenter n 


: iBLI 
jeu de la 602 MPG4 IND Miné5 stockage du chiffre en 


+82 : 
ugr n sommation du score FE 
de 4 Aféichagé HEQ4 ne mémoire n 
“SCOREN argi ” 

atx P9 


si > 22, perdu 1 Hing8 


IR F 60706 Es à GGT08 
2 X5 si égalité. 2 X50 qui 
MR9? x2F 60TOS : gagne ? 60703 

0702 sinon, elle rejoue 8 

LELT 1H5 50108 

1 M4ÿ3 vous gagnez LBLS 

GGRGHE nr8l E nrB2 * 1 H+96 

, 1 H-83 60707 
708 LBLI 

LRLÉ vous perdez STRES HULI” 
“PERDU angl €} neg? ne commentaires 


cPRs BON !” 


LBL égalité 60708 

ITE gi HE GENIRL ! FR CE 
& pe # ä [Li E1 PAGE: 
ts su Cas 
PAUSE QUE URLS BIEN” DA 
58P? &OTOË 1 


nl FT 
mi 
Fe Le 
mm 
CE D QT Ÿ 


8 Hindi Ming? on fait les comptes. LBLS 

582 60705 “4 JOLI!” 

LELS G0TOR 

“TOTAL: Arô3 5” LBLÉ 

PAUSE SUPER! GÉNIAL! TEBR 
PAUSE RIBLE?” 


65BP9 _ et commentaires LBL9 
s.)17sters 


“rfidsteps 
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Pile 


rationnelle 
sur HP-41 C 


Qui fera admettre 

à une HP-41 C 

ce que sont 

les nombres irrationnels 
et, pis, imaginaires ? 
Faisons un petit pas 

avec un programme 

qui permet les calculs 

sur les nombres rationnels. 


MB Simuler en 322 pas et 9 registres, 
soit 571 octets (1 module mémoire 
requis), une véritable pile opération- 
nelle capable de traiter des fractions 
comme des nombres n'est pas si 
facile. Une fraction étant définie 
comme le rapport de deux nombres 
entiers, chaque registre de cette 
nouvelle « pile rationnelle » doit 
donc être composé, en fait, de deux 
registres mémoire, l'un pour le 
numérateur, le second pour le déno- 
minateur. La figure 1 illustre la cor- 
respondance entre les cinq registres 
{théoriques} de la pile rationnelle X, 
Y,Z2,Tet L, et les véritables regis- 
tres de la HP-41. 

A l’aide de cette pile nouvelle, on 
va pouvoir exécuter les principales 
opérations de calcul de la HP-41 sur 
des fractions. À chaque opération, 
bien sûr, correspond un petit pro- 


Pile rationnelle Registres HP 


07 et 08 
05 et 06 
03 et 4 
yet x 
01 et 02 


Fig. 1 : 
du rationnel au réel, 
la correspondance 
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Ur LOPS 


gramme et la modularité de l'ensem- 
ble vous permettra d'en augmenter 
le nombre au gré de vos besoins : 

e A/B initialise le programme (for- 
mat d'affichage, flags et contenu 


des mémoires) et efface la pile 
rationnelle, 
ENTER ft, X = Y, RI, CLX, 


LASTX, Y*, 1/X, il est inutile de 
détailler... 

e +,-, *, À (qui correspond à la 
division), 

e =, test de l'égalité de deux frac- 
tions en X et Ÿ, 

e S, réduction (simplification) de la 
fraction en X 

e / met, enfin, le numérateur en 
attente de l'introduction du dénomi- 
näteur. 


L'ENFANCE 
cy "8RT ! 


N n/ 


HN est, bien entendu, pratique 
d'assigner chacun de ces petits pro- 
grammes à une touche du clavier et, 
pourquoi pas, dans l'ordre proposé 
par la figure 2 où les choix ont été 
faits par analogie aux noms des tou- 
ches. 


Rappelons que ces assignations 
peuvent être définitivement sauve- 


: 


les cartes du pro- 


gardées sur 
gramme lui-même, il suffit de l'enre- 
gistrer en mode USER et de ne le 
relire que dans celui-ci. 


L'emploi du programme, ou plutôt 
des programmes, obéissant aux 
règles de la notation polonaise 
inverse de la HP-41, seules les parti- 
cularités nouvelles de cette pile 
rationnelle seront décrites. Pour 
entrer une fraction, il est nécessaire 
de procéder en deux temps : entrer 
le numérateur, exécuter T/, entrer le 


USER KETS: 
1! "AB" 
"1 “{sx" 
he 
"ACT" 
"RDA" 
"ENTER?" 
"CL" 


€ 
. 
Ë 
4 
-4 
L4 
3 
e 
+ 


2 
1 
4 
Î 
i 
i 
Î 


+" 
sy" 
"{" 
EASTE" 


CL] 
n 


Gr A 


Fig. 2 : 

Les fonctions de la nouvelle 
pile sont ainsi disponibles 
en mode USER 
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Pile rationnelle 

sur HP-41 C 

Auteur Guy Beryère 

Copyright l'Ordinateur de poche 
et l'auteur 


BI+LEL “A/B" 
FIX 8 CF 23 CF 23 
CF 61 CF 62 CF A3 
CF A4 CF 65 CF RE 
CLST STO 88 STD gi 
STG 63 STG 85 ST &7 


1 STO 82 ST0 44 
STO 06 STO 90 VIEn Ÿ 
STOP 


24#Bl “CLk" 
CF 22 SF 88 SFR 8 
ENTERT 1 VIEMY STOP 


334LEL "RDR* 

XEQ A5 KEY XC 7 
X6 M KG 83 à 
x) 48 AC 86 à 84 
GTO 84 


4deiBl "7 

FC? 22 1 SF 22 5F 8 
CF 93 XEG 45 SF 83 
RON CLA ARE K "+7" 
PROMPT 


S7eLBL “LASTE" 
FC? 46 GTO 13 RCL Ai 
RCE A2 GTA #4 


6341BL 13 
XE9 #5 SF ba 


66+LBL “EXTERT" 

SF A4 XEQ 45 FC? 4 
SF 06 CF 44 KX£2 44 
XC> 46 STO 88 RH 
XO A3 %< 45 ST 67 
RCL 83 RCL 44 FC?C 82 
GTO 64 RCL 41 RCL 82 
GTO 84 


BéeLBL “XC0Y" 
XEQ 85 XEM KO 13 
XOY XC> 44 GTE B4 


JeLBL =" 

XEQ 65 STO 48 RE 83 
# X2Y STD 2 RC 4 
x ONEY7 ver ET? °e* 
RCL 69 OR? Ait 

ASTO 99 CLA LE RCL 4 
ARCL 93 KeY? *“+e" 
x#Y? ARCL 84 ARCL AA 
RDN CLX 1 ARC 2 
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&#Y? +" 
RIN PROMPT 


REY? ARC Ÿ 


129eLBL "FTx" 

XES @3 FEU 12 4 1 
KOY Yt RÈL 63 LASTE 
YtX RCL 84 LASTA T4 
GTO 88 


L43HBl “7 
SF 42 


145#L6L +" 
xEQ @5 %Eÿ 12 KE 
FS?C 82 CHE A5 


188+LBL "1/X" 
XEQ 95 KT #=07 
SF 95 KODY EG 12 
XC>Y GTO 81 


1974L8L 75" 
“ER 85 


1994L8L 81 


FIX 8 STO £ RIN STE 


#29? GTO 42 ! GTD 64 


2BS+LBL 82 
Rt 


XC> 66 STO 88 RIN 
RL 2 OXC) 63 X€} 85 
STO 87 RDKH 


268+LBL 67 
FC? 03 1j FS7 81 RON 
FC? QU SF 83 


267+LBL 68 
& STE T RDN 


27I#LBL 85 

ENTERT FRE K=8? 

GIO 18 ISGT CLA €CLX 
18 + GTO 49 


Ste 83 REL 44 STx 2 
RCL 83 ST+ 2 RH 


162#LEL "+" 


XEG 12 FOSC Be KO 


RCL AZ + X{3Y RÉEL B4 


178+LEL 66 


CLR RCL 68 KC 86 
610 84 RDN GT0 81 


+ 218+LBL 83 


ST/ T RDH REX 


168+LBL "4" 


21H EL 64 


CTÜ fé 
21%eLBL 66 


Xé) 95 STO 83 


dénominateur. La fraction, qui se 
trouve en X, est visualisée. Si le 
numérateur où le dénominateur est 
un nombre décimal, la « fraction » 
sera convertie en une autre, rapport 
de deux entiers. Si vous souhaitez 
réaliser une opération, par exemple 
une addition, presser TENTER, la 
fraction monte en Ÿ, puis entrer la 
seconde fraction (numérateur, T/, 
dénominateur) et exécuter T +. Le 
résultat, visualisé, se trouve en X, 
l’ancien X est en L (LAST X} et la 
pile est décalée vers le bas, T reco- 
pié … etc, bref, toute la cuisine 
polonaise est réalisée. 


Jamais de zéro 
——au dénominateur 


li est parfois inutile d'employer le 
programme T/ pour mettre en 
attente un numérateur, notamment 
si celui-ci est égal à 1. Dans ce cas 
pour entrer 1/D, taper simplement 


D suivi de T1/X, la fraction est en 


MOD LASTX A69T 
GTO 43 KT ST: E 


FC? 02 GTG 86 F57 22 
SF 24 


FC? 22 CF OR FC? 2 
RTH F5? 84 GT 85 

FS?C 68 GT 47 F5? 63 
GTO A7 RCLY ti 04 END 


Ke07 3906181 18 

RIH RELZ 18tx 

RCL Z FS2C 43 Gtü il 
ST0 88 RON FIx IND 88 


{ FS2C 81 RIN & 
CF 86 1 ELA ARCL Z 
4ev2 sl keV? ARCL Ÿ 979{pL 1! 
KEO 45 NOY F5? 62 pe REL 80 XY2 XOY RIN 
SF 05 Med? CF 05 XOYŸ pp 05 (OtX STe Ÿ ST Z 


FIX 8 RDN K+#@? ETH 
CF 982 CF & 1 CH 


3134 8L 12 
FS? 85 CF 82 FS2C 45 
XCH XCY STD A1 RO 
STO 82 EXD 


uv] EYTES 


Les divisions par zéro sont illéga- 
les, de même que la fonction TYX 
dans le cas où X n'est pas une puis- 
sance entière (le résultat ne serait 
plus une fraction) conduisant à 
l'affichage de DATA ERROR. TCLX 
est alors recommandé pour éviter 
tout mouvement de pile intempestif. 


Le programme de simplification 
de fraction TS s'applique à la frac- 
tion contenue dans X, et T = teste 
les deux fractions X et Y, le résultat 
étant visualisé « = » où « # ». 


La notation polonaise ne pouvant 
se réduire à quelques lignes, la quin- 
tessence de ce programme ne vous 
sera réellement livrée que par l'expé- 
rimentation, alors n'hésitez plus ! La 
HP-41 sait, enfin, toute la sublime 
différence qui existe entre 1/3 * 3 et 
1, cela ne vous donne-t:il pas envie 
de lui faire maintenant découvrir le 
monde merveilleux de l’irrationnel et 
de l'imaginaire ? 


[1 Guy Bergère 
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Utilitaire MERGE 

Auteur Jean-Christophe Krust 
Copyright l'Ordinateur de poche 
et l'auteur 


19: ‘MERGE"A- 

STATUS 2:PBOKE 
A, 255: POKE 348 
23, INT CA/256) 
; A-PEEK 38823% 
256, PEEK 39823 
. PEEK 39824: 
END 


Démonstration 
PROG ll 


S: IzA:WAIT 29 

19: "A'PRINT "PREM 
IFR PROGRAMME" 
: REEP 

28: 1=I+1:1IF I<S 
GOTO 18 

38: GOTO "B* 

AB:REM FIN NU PR 
EMIFR PROGRAMN 
E 


PROG 2 


19: "B'PRINT "SECO 
ND PROGRAMME": 


BEEP 2 

28: 1=I+l:1F 1<i8 
GOTO 18 

38: REM FIN DU SE 
CONC PROGRAMME 


PROG 3 


12: *C'PRINT "TRAI 
SIEME PROGRAM 
E":RBEEP 3 

2@: 1=l+I:lF T<15 
GOTO 14 

39: 1=9:COT0 "A 

AB:REM FIN DU TR 
OISIEME PROGRA 
MME 
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PC-1500 : 


MERGE, 


ou l’indépendance 
(avec et sans 


le CE-150) 


Les ordinateurs de poche 
ont hérité 

des calculatrices 
programmables 

certaines particularités 
très appréciables. 

Ils peuvent entre autres 
conserver simultanément 
en mémoire plusieurs 
programmes indépendants. 


EH Sur le PC-1500, c'est à la fonc- 
tion MERGE que l’on doit de pou- 
voir faire cohabiter plusieurs pro- 
grammes en mémoire. Nous allons 
donc faire le tour de cette question 
en remarquant, une fois de plus, 
que le manuel de Sharp est assez 
avare de renseignements. On verra 
de plus comment « merger » sans 
l'interface CE-150 et donc sans ütili- 
ser la fonction prévue à cet effet. 


Trois petits programmes vont 
illustrer notre propos et mettre en 
évidence les propriétés des program- 
mes « mergés ». Ceux-ci doivent 
être introduits et sauvés sur une 
cassette les uns après les autres : 
NEW, introduire le premier pro- 
gramme en mémoire, CSAVE 
« PROG»: NEW, introduire te 
second programme, CSAVE 
« PROG2»; NEW, introduire le 
dernier programme, CSAVE 
« PROG3 », NEW. 


A ce stade de l'expérience, résu- 
mons : rien dans l'ordinateur, tout 
sur la cassette, c’est-à-dire trois pro- 
grammes différents qui n’ont a priori 
rien de commun si ce n'est qu'ils 
utilisent parfois (!} les mêmes numé- 
ros de ligne. 

Leur chargement en mémoire ne 
présente aucune difficulté : CLOAD 
« PROG1 », puis MERGE « PROG2 » 


et, enfin, MERGE « PROG3 ». Un 
coup d'œil sur les programmes 
mémorisés révèle que ceux-ci ont 
été « concaténés » (autrement dit : 
placés à la queue leu leu). 


L'expérience vous montrera que 
l’on peut modifier seulement le der- 
nier programme entré : toute tenta- 
tive sur les autres n'a d'effet que sur 
ce dernier (essayez !). Il n'est donc 
pas possible d'effacer /ndividuelle- 
ment l'un ou l'autre des program- 
mes. 


L’exécution dispense aussi de pré- 
cieux enseignements : RUN... Elo- 
quent, n'est-ce pas ? L'ordre RUN 
commande l'exécution du premier 
programme ; un GOTO numérique 
(de même qu'un GOSUB, THEN...) 
ne renvoie qu'aux numéros de ligne 
du programme exécuté et de lui seul 
{c'est cela l'indépendance !); en 
revanche, un GOTO « alphanuméri- 
que » se moque des barrières ; 
enfin, l'exécution est interrompue à 
la fin du second programme alors 
qu'aucun END ou STOP n'y appa- 
raît : ce « end » existe pourtant, il 
s'agit d'un octet, invisible, de code 
255 que la fonction MERGE place 
systématiquement en tête de cha- 
que programme « mergé ». Un DEF 
C provoquera l'exécution successive 
(3-1-2) des programmes. 


——— Plusieurs fois ——— 
—le même n° de ligne— 


Les communications à l'intérieur 
d'un même programme sont donc 
essentiellement réalisées grâce aux 
numéros de ligne. Peu importe dès 
lors que les différents programmes 
coexistants comportent une ou plu- 
sieurs lignes dont les numéros 
soient identiques. Les communica- 
tions entre les différents program- 
mes sont quant à elles assurées par 
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les variables, bien sûr, mais surtout 
grâce à l'adressage symbolique, 
c'est-à-dire grâce aux étiquettes 
alphanumériques (de 0 à 76 lettres). 
Un programme « mergé » doit donc 
obligatoirement comporter au moins 
une étiquette alphanumérique per- 
mettant d'y accéder et de l’exécu- 
ter. 

Enfin, de ces différents program- 
mes « mergés » il est possible de 
n'en faire qu'un, dans l'exemple : 
CSAVE « PROG123 », qui conser- 
vera toutes les propriétés issues de 
l'emploi de MERGE à ceci près qu'on 
ne pourra plus modifier que le pre- 


mier programme au lieu du dernier. 


Le petit utilitaire MERGE permet à 
ceux qui ne possèdent pas l'inter- 
face CE-150 de bénéficier des avan- 
tages des programmes « mergés » ; 
son emploi est des plus simples. 
Introduisez un programme en 
mémoire et protégez-le par l'exécu- 


tion de « MERGE ». L'utilitaire 
« poke » alors le « end » invisible 
{code 255) et ajuste la variable 


système de STATUS 2 (30823, 
30824) ainsi que celle du pointeur de 
MERGE (30825, 30826) qui contient 
l'adresse du premier octet de 
mémoire reprogrammable. Les pro- 


grammes mémorisés ne sont plus 
alors accessibles qu'à l'aide d'éti- 
quettes alphanumériques. Mais vous 
pouvez en composer un nouveau 
depuis le clavier exactement comme 
s'il était lu sur une cassette grâce à 
la fonction MERGE. 

Attention cependant : n'exécutez 
jamais plusieurs fois consécutive- 
ment le programme « MERGE » 
sans introduire au moins une ligne 
de programme. Si vous ne le faisiez 
pas, vous risqueriez de perdre les 
programmes en mémoire. 

Li Jean-Louis Marx 
et Jean-Christophe Krust 


Transposition 


des programmes de TI 57 
sur TI 58 et 59 


Voici les quelques règles 
qui vous permettront 
d'adapter facilement 

les programmes écrits 
pour la petite machine. 


M |! se peut qu'après avoir décou- 
vert l'informatique de poche sur une 
T157, vous soyez passé à un 
modèle supérieur du même cons- 
tructeur : TI 58 ou 959. il se peut 
aussi que vous utilisiez l’une de ces 
deux dernières machines sans con- 
naître la T1 57. Dans un cas comme 
dans l’autre vous avez certainement 
des difficultés pour utiliser sur votre 
TI 58 ou 59 les programmes écrits 
pour T157. Voici qui devrait vous 
facititer la tâche. 
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L'ENFRN cE 


Les indications qui suivent ne 
constituent en rien la meilleure 
façon d'adapter un programme. En 
fait, elles sont très gourmandes en 
pas de programme et elles n'utilisent 
pas au mieux les possibilités des 
TI 58 et 59. Leur intérêt est autre : il 
s'agit de transposer rapidement la 
liste d’un programme de TI57 en 
appliquant seutement quelques 
règles faciles à retenir. Cela permet- 
tra par ailleurs de faire apparaître les 


caractéristiques respectives de ces 
différents matériels. 


La touche 2nd ayant le même rôle 
sur tes deux machines {nous enten- 
dons par là sur la T1 57 d'une part, 
et, d'autre part, la TI 58/59 considé- 
rée comme une seule machine), 
nous ne la mentionnerons pas dans 
cette étude. Une précision impor- 
tante cependant : la TI57 admet 
que l'on écrive indifféremment 2nd 
Inv ou Inv 2nd sans risque d'erreur, 
mais la Tt 58/59 ne tolère qu'inv 
2nd : une habitude à prendre. 


La TI 57 utilise dix étiquettes 
numérotées de 0 à 9. Le plus simple 
est de leur faire correspondre sur la 
58/58 les étiquettes À à E’ selon la 
convention suivante : 
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side 


Be 


157 [bi Lbl 3 | Lbt 4 [ini 5 
TI 58/59]Lbi À Lbt C | Lbl D | Lhi E 
1157 [Loi 6 | bi 7 | Lbi 8 | Loi 9 [bi 10 
F1 58/59/Lb A' | Lbi 8°] Lbt C'} Lbi D] Lbi E' 


Le démarrage d'un programme 
par 5 SBR 2 (TI 57} devient ainsi 5B 
sur 58/59 : inutile en effet de taper 
SBR. 


Parmi les huit mémoires indiffé- 
renciées de la 57, numérotées de 0 à 
7, deux jouent en plus un rôle spéci- 
fique, le registre 0, mémoire de 
décrémentation et le 
registre 7, mémoire de 
test. Pour conserver les 
possibilités de calcul dans 
les mémoires, d'échange, 
etc., nous garderons la 
correspondance sur 
58/59. Cela n'est pas 
gênant pour la mémoire 0, 
mais on devra se livrer à 
une petite gymnastique 
concernant la mémoire 7. 
On veillera par ailleurs, 
même si ce n'est pas tou- 
jours indispensable, à 
frapper 00 pour 0, 01 pour 
1, 02 pour 2, ...et 07 pour 
7; STO 3 devient donc 
STO 03 et Exc 3 devient 
Exc 03. 


Sur la TI 57, l'instruc- 
tion Dsz décrémente la 
mémoire 0 et effectue un 
test sur son contenu. 
Nous garderons donc la 
mémoire G pour les décré- 
mentations en précisant 
simplement Dsz 00. 


Le GTO traditionnel des 
TI 57 (renvoi à une éti- 
quette numérique) dispa- 
raît au profit des étiquet- 
tes À, B, C, …, D',E':il 
suffit d'inscrire le nom de 
l'étiquette où doit s'effec- 
tuer le renvoi. 


ME 
Sao | 8 [uma tn | 


Un cas particulier : l'instruction 
RST qui, sur 58/59, ne peut pas être 
utilisée après un test. On devra donc 
utiliser un renvoi direct au pas de 
programme n° 000. 


T1 57] STO 2 RST] Dsz RST 
58/59] STO 02 RST|Dsz 00 000 | x-t 000 | 


Comme on l’a vu, sur la TI 57, la 
mémoire de test est confondue avec 
la mémoire 7, elle joue le rôle d’une 
mémoire indifférenciée, Pour con- 


N° 12 - AVRIL 83 


server cette indifférenciation sur les 
58/59, nous utiliserons aussi la 
mémoire 07, mais cela nous obligera 
à prendre deux précautions concer- 
nant les tests et l'effacement du 
registre 07. 


L'instruction C.t. de la 57 se tra- 
duira par Exc 07 O0 Exc 07, et tout 
test devra systématiquement être 
précédé d'un transfert entre la 
mémoire 07 et le registre indépen- 
dant t sans modification de l'affi- 
chage ; de deux pas de programme, 
on passe à sept : RCL 1x=t (TI 57) 


devient RCL 01 x = t RCL 07 x =t 
x=t (58 et 59). 


L'échange entre l'affichage et le 
registre de test (x = t) s'écrira Exc 
07. Si cet échange a lieu juste avant 
un test, il est possible de simplifier. 
La séquence x = t x=t des 57 
s'écrira STO 07 x = t x =t sur 58/59. 


Nous en arrivons maintenant à la 
partie la plus délicate, à savoir le fait 
qu'après un test, les Tl 58/59 
n'acceptent que des instructions de 
renvoi, alors que les codes combi- 
nés de la TI 57 autorisent d'autres 
opérations. 


Si l'instruction TI 57 qui suit le 
Dsz où le test est un renvoi incondi- 
tionnel ou un appel de sous-pro- 
gramme : pas de problème. 


T1 57 |Dsz GTO 7! x>t GTO 3| inv x>t SBR4 
58/59 | Dsz 00 B' x2t C Inv x2t D 


Par contre, si Dsz ou si le test 
sont suivis d'une autre indication 
(STO n, x, etc.}, il faut obligatoire- 
ment utiliser une touche étiquette 
renvoyant inconditionnellement à un 
programme situé en fin de mémoire, 
programme qui lui-même 
devra renvoyer à l'adresse 
suivant celle de la touche 
étiquette : on est obligé de 
faire un détour... Ainsi Dsz 
STO 1et x=te1 sur TI 57 
deviennent respective- 
ment sur 58/59 : Dsz 00 x? 
Lbl x (...) Lbi x2 STO 01 
GTO V x d'une part et x=t 


RCL Lbl SUM 1? {..) Lbl 
RCL e GTO SUM d'autre 
part. 


On aura bien évidem- 
ment tout intérêt à utiliser 
des étiquettes faciles à 
associer {x? et x, sin et 
cos, etc.). 

Quelques autres petits 
problèmes : l'instruction 
Pause est en général plus 
courte sur la T1 58/59 : il 
conviendra donc de la 
répéter deux ou trois fois 
pour obtenir une durée 
d'affichage équivalente. À 
noter aussi que l'instruc- 
tion n Inv Log qui, sur la TI 
57, permet d'obtenir facile- 
ment des puissances de 
10, risque, en raison 
d'erreurs d'arrondi, de 
donner des résultats aber- 
rants sur T1 58/59 ; il fau- 
dra faire : 

TI 57 n inv Log 
TI 58/59 n Inv Log EE Inv EE 


Enfin, il sera sans doute préféra- 
ble de se servir du générateur de 
nombres aléatoires inclus dans le 
module de base de la TI 58/59, plu- 
tôt que de recopier les générateurs 
souvent très simplifiés (et donc de 
moindre qualité) utilisés sur la TI 57. 


Voilà... Bien évidemment, cet arti- 
cle ne prétend pas épuiser le sujet, 
et la méthode indiquée est assez 
lourde, mais elle convient pour la 
plupart des programmes, et elle per- 
met d'effectuer des transpositions 
d'une façon presque automatique. 


[] Bernard Elman 
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à ENFIN cE 
5 pa "par! 
_ 


an A 


Jeu du Trio 


programme pour FX-702 P 


Auteur Alain Ginsbach 


Trio, un jeu 
où l’on recule 
pour mieux sauter 


Copyright l'Ordinateur de poche et l'auteur 


VAR: 56 PRG: 1448 


PO: 598 STEPS 
18 KAIT B:PRT ”4TR 
1047: VAC 


28 B7=3:88-2:B0-1: 
CB=140 1-15: 02 


16 

2 C34="1":C45=7x" 
1054" 2": C68="- 
RES 


38 TH? 71/2 JOEUR( 
5)", N2F M4: 1F 


oNSIF Ms5IF Ks 


2 THEN 39 

49 INP 76/1 LISTE” 
BF Bxg5 IF Bt 
1 THEN 48 

0 ACR+G)= TI J=1-J: 
S=6+3+J:R=35-S 
102546: IF Bt: 


ODE ? 
68 FOR 1=1 TG 16:R 
SCL)= PME 
18 FOR [=] T0 22 
73 IF ACD#B: SEA 


m 
38 $=""2K#=S:FOR ! 
=] 10 16:$=$+h$ 
(DNERT 116070 


99 

95 K$="7" 

39 0=8 

108 PRT $:2-J5;K$: MO 
DE 8 

116 IF Y=16-154J5EN 


b 
128 IF N=1:1F J=h-1 
_ #2:60T0 21 


130 KS=KEY: IF K$=7” 
THEN 138 

140 IF Ü=1 THEN 208 

130 1F KS=7,"5PRT ” 


: END 
166 FOR G=1 T0 3 
165 IF K$=AS(R+G+6) 


0=1:6010 198 
110 HEXT 6:6010 95 
288 LLiIF Kéx+5l 

en Ë KT 
8 DB DEIFEA 


HEN 95 
22% JF E=2 A#(QHI)- 
rA(S+1)=6 
238 G0TO 58 


PL 146 STEFS 


19 K=R(A4G):T= Gal: 
IF Y{B3T=-T-4 

15 IF J=8iT=-T 

28 Ÿ=RETIIF Ÿ2831F 

YCLTAS=AS CT): 

IF A$+A#(Q+0) T 
HEN 48 

36 E=Q:PRET 

48 ÏF A$=","5E2i:p 
ET 

6 FOR I=1 10 3 

55 IF Af=AS(GHIDSE 
223RET 

69 NEXT L'GÛTO 38 

P2: 459 STEPS 
18 P=ÿ 
11 FOR 6=i 10 3 
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15 IF ACR+G)=0 THE 
N 251 

28 FOR L=-1 TO 1 S 
JEP 2 

38 658 H1:IF E-8T 
HEN 250” 


31 IF E=15E:8 
32 IF EDF I4HiE 


=4 
48 IF Y=SI#iiRET 


38 D=Q:F=0:H=9:U=9 
68 FOR I=-3 TO 321 
F_I=8 THEN 196 
78 !F ABS 1=6G THEN 


198 

88 2=ACSHABS L)IF 
2=8 THEN 198 

38 O=SGN (J-,5):€- 
Ox(2k(1-S6N 1)- 
ABS 1) 

188 IF K-2=C:D=2 

119 IF K+T-2=C3F22 

128 2=2-0#Is IF X-2= 
CsH=i 

138 IF R4T-2:C5Uef 

148 2=2t0w4ilF K-2= 
CiH=i 

158 [F Y+T-2-Cilei 

198 NEXT ! 

288 H=Ci+S6h (E-1)) 
#(D-FI+E+CH-U4L 


}/2 

218 IF G*l=-Ji IF FR 
RC L(X-1)/3)80 
H=t{ 

228 IF Pas IF HOT 
HEN 298 


230 IF PsÿsIF H=V:1 
k DUR THER 


248 P Du: YA 

268 NEAT L 

291 HEXT 6 

239 IF P=Q5 END 

268 ü=APS FiL=G6N P 


R 


Ce n'est certainement pas 
la complexité d’un jeu 

qui en fait l'intérêt. 

Celui qui fait l’objet 

de cet article 

en fournit la preuve. 
Vous pourrez d’ailleurs 


vous y exercer 
avec où sans FX-702 P. 


B Trio est un jeu de stratégie minia- 
turisé aux dimensions des micropo- 
ches. On en attribue généralement 
l'invention aux Indiens Jivaros. Ces 
derniers, selon la légende, auraient 
fait réduire dans une même mar- 
mite, un Cyber 250, un programme 
d'échecs et une équipe d'informati- 
ciens. Hs auraient ainsi obtenu un 
FX-702 P et Trio, mais on ignore 
encore ce qu'il est advenu du troi- 
sième ingrédient ! 

Les règles du jeu sont beaucoup 
plus simples que celies des échecs. 
Deux joueurs disposent chacun de 
trois pions qu'ils déplacent à tour de 
rôle sur une rangée de seize cases 
bien alignées. À remporté la partie 
celui qui, le premier, place un de ses 
pions sur la case la plus éloignée de 
ses positions de départ en respec- 
tant les règles suivantes : 

e En début de partie, les pions sont 
disposés selon le schéma 
ZXlessessesses — + *+ 
(Z, X et | représentent les pions du 
premier joueur, —, + et *, ceux du 
second). 

« Les pions | et — progressent par 
bond d'une case et reculent par 
bond de deux cases. Les pions X et 
+ avancent et reculent par bond de 
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deux cases. Les pions Z et * pro- 
gressent par bond de trois cases et 
reculent par bond d'une case. 

+ Deux pions ne peuvent occuper 
une même case. Toutefois, la 
« prise » d’un pion adverse est auto- 
risée à condition que les deux pions 
soient de nature différente. La 
« prise » met le pion adverse défini- 
tivement hors-jeu. 


Deux cas particuliers : le joueur 
qui ne peut plus déplacer aucun de 
ses pions perd la partie ; enfin, une 
partie est déclarée nulle lorsque la 
même situation de jeu se répète 
pour la troisième fois. 


Le programme proposé dans cet 
article permet à deux joueurs de 
s'affronter sur l'écran d'un FX- 
702 P. Il comporte également une 
routine capable de prendre la place 


de l'adversaire qui vous ferait 
défaut. 
— Plusieurs options 
—— sont possibles 

Dès que l'on a lancé le pro- 


gramme PO, la machine demande 
« 1/2 JOUEUR(S)?5». Si vous 
répondez « 1 », pour jouer contre la 
machine, celle-ci vous demandera 
« JOUEZ-VOUS 1 OÙ 2? », ques- 
tion à laquelle vous répondrez « 2 » 
si vous désirez {ui laisser l'entame. 
L'affichage indique alors «0/1 
LISTE ? ». À cette question, vous 
répondrez « 1 » si vous voulez con- 
server une trace écrite du déroule- 
ment de la partie (voir exemple ci- 
contre). Dans le cas contraire, vous 
répandrez « O ». 


Les seize cases du jeu apparais- 
sent alors sur l'écran, ainsi que les 
pions dans leurs positions de départ. 
Le joueur qui a la main est désigné 
par un chiffre à droite de l'écran. À 
remarquer que celui qui entame joue 
toujours avec les pions de gauche 
{Z, X et l). 


Pour jouer un coup, il suffit de 
presser la touche correspondant au 
pion choisi et de préciser le sens du 
mouvement par une pression de la 
touche « + » (pour avancer} ou de 
la touche « — » (pour reculer}. Au 
bout de quelques secondes, la 
machine affiche la nouvelle situation 
de jeu. 


Pour interrompre une partie en 
cours ou pour concéder une victoire 
par abandon, on presse sur la tou- 
che «.» {point décimal, et ici point 
final). 


Si vous vous intéressez au pro- 
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gramme lui-même, voici quelques 
explications qui vous aideront à le 
« décortiquer » : 

e La position et le « graphisme » de 
chaque pion sont mémorisés dans 
les variables B7 à B9 et C3$ à C5$ 
pour le premier joueur, CO à C2 et 
C6$ à C8$ pour le second. Ces 
variables sont initialisées en début 
de partie {lignes 20 et 25). 

e La variable J prend la valeur 1 ou 
0 selon que la main revient au pre- 
mier ou au second joueur. L'index R 
permet d'adresser les variables dans 
lesquelles sont mémorisées les posi- 
tions des pions du joueur qui a la 
main ; l'index S permet d'adresser 
les variables dans lesquelles sont 
mémorisées celles de son adversaire 
(ligne 50). 

° La variable $ est utilisée pour affi- 
cher la position des pions sur le jeu 
(lignes 60 à 100). 

.< Le coup joué est déterminé soit 
par l'appel de la sous-routine P2 
(GSB #2 de la ligne 120), soit en 
fonction de 2 caractères frappés au 
clavier (lignes 130 à 200). 

« La sous-routine P1 appelée à la 


EXlooonvonono "tt 
Lolo ssvonsr tt 
Lolo csonet" et 
EN PP PP 
2,1,.4...,4.,-,# 
Lolo ohanton" 
LA EPA LAIT RE 
POP PUR CITES | 

alt seu" 
PAR PC AL PP 
FAN PRIE LP Î 
LA CAR LP 2 
doclosscte fees 1 
LocolorsteoK8 se 2 
Lonnlotocro NV re | 
ARE CAPOTE LP 1 
2.,.41....,%t—.. { 
a tlosso0K8se 2? 
APE) PEPLA RP l 
cosbtlossannT es 2 
snndtlonnker eus Î 
PPT LAN PEL PET ? 
ANTAA CE TPS Î 
APN LA PRPEL PP 2 
vondtales see" Î 
rosêt, d ko 2 
esltss ve Î 
cotslsssoskes 2 


+ CERF LRALELL 1] 


els lise sect 2 


Î 
2 
Î 
2 
! 
2 
Î 
2 
1 
2 


Exemple de partie : 
c’est le joueur n° 1 
qui a gagné. 


ligne 210 calcule la position de 
départ du pion déplacé {X}, sa posi- 
tion d'arrivée (Y} et vérifie si le mou- 
vement correspond à une prise 
{E=2) ou s'il est interdit (E=0). En 
cas de prise, le pion de l'adversaire 
est mis hors-jeu (ligne 220). 


Tout seul 
contre 450 pas 
——— de programme 


La routine P2 pourra vous tenir 
lieu de partenaire si vous êtes dis: 
posé à lui accorder les quelque 25 
secondes de réflexion qu'elle exige à 
chaque coup. Cependant, comme il 
est plus satisfaisant de se faire bat- 
tre par son propre programme que 
de battre celui d'un autre, vous 
chercherez probablement à l’amélio- 
rer. Dans ce cas, les quelques 
remarques qui viennent pourront 
vous être utiles. 


A chaque coup, six mouvements 
sont théoriquement possibles. La 
routine P2 les étudie successive- 
ment. Un premier test {ligne 15) per- 
met de vérifier que le pion concerné 
est toujours en jeu; un second 
(ligne 30) permet de s'assurer que le 
mouvement envisagé est valide. 


Les mouvements autorisés sont 
examinés en fonction de différents 
critères : 
1)Le pion est-il actuellement 
menacé par un pion adverse ? (ligne 
100). 

2) Le pion sera-t-il menacé à la suite 
du déplacement envisagé ? (ligne 
110). 

3) L'adversaire peut-il facilement 
menacer le pion, si celui-ci reste 
immobile et s’il est déplacé 
(lignes 120 à 150). 

4) Le mouvement permet-il d'assu- 
rer une prise immédiate ? (ligne 32). 
5) Le mouvement permet-il de rap- 
procher le pion du but ? {ligne 210). 


Les réponses à ces questions sont 
intégrées dans une formule empiri- 
que {ligne 200) dont la valeur est 
censée déterminer le meilleur choix 
(lignes 220 à 240). Un facteur de 
hasard enfin est introduit dans la 
décision à la ligne 230 afin de varier 
les parties. 


La formule retenue ici permet au 
programme de se défendre honora- 
blement, mais n’en fait qu'un piètre 
attaquant. L’aigorithme absolu reste 
à développer. Alors, si le cœur vous 
en dit ! 


[_ Alain Ginsbach 
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Décryptez les petits points 
affichés par le PC-1211 


Si vous avez oublié 
quel est le nom 

des programmes 

que vous avez sauvés 
sur vos cassettes, 
voici une technique 
simple qui devrait 
vous tirer d'embarras. 


M On a vu dans l'Op n° 9 comment 
obtenir des dessins animés point par 
point sur une petite partie de l'affi- 
cheur du PC-1211. Ces possibilités, 
bien qu'inattendues, ne sont pas le 
fait du hasard : elles répondent à 
une logique et débouchent 
aujourd’hui sur une application prati- 
que. 


Si, pour une raison ou pour une 
autre, vous n'arrivez pas à retrouver 
sous quel nom a été sauvegardé sur 
cassette l'un de vos programmes, 
vous pensez que ce programme est 
perdu à tout jamais. Détrompez- 
vous : il existe un moyen relative- 
ment rapide de retrouver le nom 
oublié, et par conséquent de rechar- 
ger le programme. 


La technique utilisée repose exac- 
tement sur le même principe que 
celui qui a été exposé dans /’Op 
n° 9, et que nous rappelons briève- 
ment dans l’encadré ci-dessous. 


Une fois que vous serez parvenu à 
obtenir la ligne 10: A = n # nr, 
vous pourrez vous livrer à des 
essais. En ajoutant une seconde 
ligne : 


20: “"X = 1.111111111 : GOTO'" 
et en demandant l'exécution de ce 
court programme, vous obtiendrez à 
l'affichage une barre noire qu'il est 
facile d'interpréter : chaque point 
correspond en fait à l'un des chiffres 
composant le nombre qui, à la ligne 
20, est affecté à la variable X. Le 
dixième chiffre définit l'état de la 
première colonne en partant de la 
gauche, le neuvième celui de la 
deuxième colonne, etc. ! y a donc 
“écriture en miroir” 


Suivant la valeur de ce chiffre, 

telle ou telle combinaison de points 
noircit dans la colonne intéressée. Si 
nous modhifions la ligne 20 pour en 
faire : 
20: ""’X = 1.111111888 : GOTO"‘" 
nous observons que les trois points 
de gauche s'inscrivent désormais sur 
la quatrième rangée de l’afficheur. 


Modifions encore la ligne 20 : 
20 :"""X = 1.111111777 : GOTO"" 
Ce sont maintenant les trois points 
supérieurs des trois premières colon- 
nes de l'afficheur qui sont noircis. 


De tout cela, on peut conciure 
que la rangée supérieure des points 
vaut un, la deuxième vaut deux, la 
troisième vaut quatre et que la qua- 
trième vaut huit. Le chiffre 7 (4 + 2 
+ 1) provoque donc l'affichage des 
trois rangées supérieures. Vous pou- 
vez vérifier que le chiffre 9 conduit à 
afficher un point noir dans la rangée 
du haut (valeur 1) et dans la rangée 
n° 4 (valeur 8), car 8 + 1 — 9. Pour 
vous en assurer, modifiez encore 
une fois la ligne 20 : 


Comment obtenir la fonction “"#" ? 


e en mode Reserve, faire NEW, puis SHFT À EEEE ENTER et SHFT S EEEE 
ENTER ; 
« sauvegarder la mémoire de réserve sur une cassette (CSAVE "R") ; 

e passer en mode Pro et charger ce que l'on vient de sauvegarder (CLOAD 
#“R") ; 
e demander LIST : le programme en mémoire se réduit à une ligne étrange : 


155 : EEE < = EFÉEE ; 


e sans quitter le mode Pro, par insertions et déplacements du curseur, affecter 
la séquence EEE < = EFEE à la variable A$ (198) ; l'affichage indique alors les. 
sept caractères qui ont été stockés en A$ (198) : EEE < EEE ; 

e appuyer sur la touche Y jusqu'à l'apparition de 56 : EE# EEEO ; 

e par insertion et déplacements du curseur, cueillir le signe # de cette ligne 
pour obtenir une nouvelle ligne ainsi fibellée : 10 : À = n # net effacer la ligne 


156. 
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sn 


EL HEC (1) 


… 


à 
x 
Ÿ 
+ & 


“ 
ù 


à 
“ 
CE 
th 


l 
ñ 
ë 
| 
= 


+ 
“ 
>, 


ER 
_Sén 
_BE 


E 
|| 


20 : ““* X=1.111111999 : GOTO 


Ces remarques étant faites, on 
notera que les chiffres O à 9 n'ont 
jamais d'effet sur la totalité des qua- 
tre premières rangées de carrés 
noirs. Pour obtenir que soient noir- 
cies ensemble les quatre premières 
rangées {valeurs : 1, 2, 4 et 8} il fau- 
drait en effet disposer d'un chiffre 
valant 1 + 2 + 4 + 8, autrement 
dit 15. 


C'est en affectant une chaîne de 
caractères à une variable aiphanu- 
mérique que l’on obtiendra le résul- 
tat recherché. Encore une fois, on 
modifiera la ligne 20 de notre pro- 
gramme : 


20 ‘‘’" A$ = ‘0000000’ : GOTO‘" 


L'ordre RUN, maintenant, conduit 
à l'affichage d'une sorte de quadfril- 
lage, et l’on découvre des colonnes 
dont les quatre points supérieurs 
sont noircis. Ces colonnes représen- 
tent donc des valeurs égales à 1 + 
2 + 4 + 8, soit 15. 

La raison en est que le PC-1211 
utilise la notation hexadécimale (1) 
pour désigner les fonctions, les let- 


{1} Voir à ce sujet l'article de Serge Boisse et 
Jean-Paul Cotillon dans l'Ordinateur de 
Poche n° 7, pages 63 à 66. 
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U + uw 


fn 


#2C 
13D 
UE 


15F 


tres et autres caractères. Ainsi la let- 
tre À est codée 5.1. Quand le 
poquette introduit un caractère dans 
une variable, it donne en fait les 
coordonnées du caractère qui sont 
rappelées dans le tableau ci-dessus. 


Lorsque le PC-1211 affecte ‘’BON- 
JOUR‘ à la variable A$, il met en 
A$ les valeurs F5, 52, 5F, 5E, 5A, 
5F, 65 et 62. Le premier de ces 
codes (F5) indique que la variable 
est alphanumérique. 


Dans le n° 46 de L'Ordinateur 
Individuel, à la page 249, on trouve 
une méthode inspirée des remarques 
qui précèdent et qui permet de 
retrouver quel est le nom d'un pro- 
gramme sauvegardé sur une cas- 
sette. Je me propose de vous indi- 
quer comment obtenir le même 
résultat plus facilement à l'aide des 
deux tableaux qui vous servirons de 
table de références. 


Le procédé est en réalité très sim- 
ple. Vous avez déjà entré la ligne 
10: À = n # n dans votre 
poquette, le plus gros du travail est 
donc fait. 


En ligne 20, vous inscrirez 
CHAIN ‘’?”, puis vous repasserez en 
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Es 
LL sue LLLL] 
ES 


mode RUN. Votre programme est 
devenu : 

0:A=1r#n7 

20 : CHAIN ‘‘?” 


Positionnez maintenant votre Cas- 
sette magnétique au début d’un pro- 
gramme, télécommande active 
{autrement dit ‘‘remote”’ sur la posi- 
tion ON") et touche de lecture 
enfoncée, puis faites exécuter le 
programme. Quelques secondes de 
patience, et un ensemble de points 
vient s'inscrire en haut et à gauche 
de l’afficheur. Vous devez alors arrê- 
ter votre magnétophone, mais sans 
toucher à votre PC-1211 qui conti- 
nue à attendre un programme à 
chaîner… 


Les points noirs qui se sont ins- 
crits sur l’afficheur du poquette ne 
sont autres que le nom de votre pro- 
gramme codé sous une forme gra- 
phique. La lecture doit s'effectuer 
de droite à gauche et les colonnes 
de points s’interprètent par groupe 
de deux. 


Les deux premières colonnes sont 
toujours identiques, elles correspon- 
dent au code F5: elles signalent 
seulement le caractère alphanuméri- 


LL] CLLL] CI ES 
LEE 


que de la chaîne. Continuons la lec- 
ture sans oublier qu’elle s'effectue 
de la droite vers la gauche. Les deux 
colonnes de points suivantes sont la 
représentation graphique de la pre- 
mière lettre composant le nom de 
votre programme. Les deux colon- 
nes suivantes correspondent à la 
deuxième lettre, etc. 


En vous reportant au premier 
tableau, vous obtiendrez une valeur 
comprise entre O0 et 15 pour la pre- 
mière et la seconde colonne de 
points codant un caractère. Ces 
deux valeurs sont les coordonnées 
du caractère : la première vous indi- 
que dans quelle ligne du second 
tableau il se trouve, et la seconde 
dans quelle colonne : au croisement 
des deux, vous pouvez lire le carac- 
tère décrypté. 


En lisant ainsi, par groupe de 
deux colonnes, et de la droite vers la 
gauche, le graphisme qui est apparu 
à l'affichage, vous retrouverez le 
nom que vous aviez donné à votre 
programme, et vous pourrez récupé- 
rer votre logiciel par les moyens 
classiques. 


C1 Xavier Werquin 
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De bonnes résolutions 
et 4° degrés) 


(3° 


Résolution d'équations 
du troisième degré (TI 57) 


Auteur Jean Rosset 
Copyright l'Ordinateur de poche et l'auteur 


00 
01 
02 
03 
04 
05 


07 


DRERONBOUEERARIERHSLES 


O1 O1 — œ@ O1 = — LS] 


DO 


2nd Prd 4 


x2 


x 

RCL 3 

SUM 4 
3 


INV Prd 4 
RCL 4 
INV SUM 0 
2nd Ixl 
x2t? 
RST 
RCL Q 
R/S 
SUM 1 
INV Prd 3 
2 
+/- 
INV Prd 1 


INV SUM 5 
RCL 5 
R/S 
2nd Lbl ? 
RCL 1 
R/S 
RCL 3 
+ /- 
vx 
R/S 
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sur TI 57 


On croit souvent 

qu'avec ses cinquante 

pas de programme, 

la TI 57 ne peut 

résoudre que des équations 
du deuxième degré. 

Il n’en est rien. 


B Voici deux programmes dont Fun 
calcule les racines réelles où com- 
plexes d'une équation du troisième 
degré et l’autre toutes les racines 
réelles d'une équation du quatrième 
degré. 


Les équations de la forme x° + 
a, x? + a, x + a; = 0 possèdent 
toujours au moins une racine réelle 
que !’on peut calculer par la méthode 
de Newton. Partant d'une valeur ap- 
prochée x, de cette racine, on cal- 
cule x; = xy — p {x)/ p' (x), avec 
ptx) = x° + a, x2 + a,x + a, ; x,est 
une meilleure valeur approchée de la 


4 


racine. Le processus est itératif et la 
suite x, ,, = x, — p (x}/p" {x} tend 
vers er des ‘racines de l'équation 

p (x) = On arrête l'itération dès 
A Ib na (x.}l est inférieur à 
£ , € étant un nombre positif 
« petit » que l'on s'est donné à 
l'avance { £ = 106 ou 108 par exemn- 
ple). 

Si r. est cette racine, le polynôme 
p {x) peut s'écrire p (x) = {x - ri) 
(x2 + b,x + b,}, avec b, = a, + r.et 


Résolution d'équations 
du quatrième degré (TI 57) 


Auteur Jean Rosset 
Copyright l'Ordinateur de poche et l'auteur. 


00 RCL 0 
01 x 

02 RCL 5 
03 + 

04 STO 6 
05 RCL 1 
06 SBR 9 
07 RCL 2 
SBR 9 
RCL 3 


SUM 6 
X 
RCL 5 


+ Leu Lee] G (DO N CO — a 


+ 
RCL 4 


BRSHBRERELETER 
a 


2nd Exc 6 
INV Prd 6 
RCL 6 
INV SUM 5 
2nd 1xl 
2ndx2>t? 


8 
oo 


INV SUM 3 
RCÇCL 5 
INV Prd 3 
0 
2nd Exc 0 
2nd Prd 5 
2nd Exc 1 
STO 2 
RCL 5 
SUM 2 
RST 
2nd Lbl 9 


3 6 
-34 5 
40 
76 
71 
35 
81 
8 
-39 4 
33 4 
38 3 
-34 3 
3 5 
-39 3 
00 


88 
en © 


SUM 6 


x 
RCL 5 
2nd Prd 6 


oo Le) [<e] N O1 N = 


THBBRLRBEIEURE 


+ 
INV SBR 
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Calcul de p{x) 


x:x-p{x)/p(9 


b, = -a,/r. Pour trouver les deux 
racines réelles ou complexes restant 
à calculer, il suffit de résoudre l’équa- 
tion x? + b, x + b, = 0. Si le discri- 
minant de cette équation est positif, 
nous trouverons deux racines réelles 
r, et ra; S'il est négatif, nous aurons 
deux racines complexes conjugées 
de la forme r,3 = u + iv. 


Le programme se déroule confor- 
mément à l'organigramme de la 
fig. 1. Il est conçu de telle manière 
que si les trois racines sont réelles, 
elles sont affichées aux arrêts suc- 
cessifs (r,, puis r, et r.). Si en revan- 
che il n’y a qu'une seule racine réelle, 
la machine, après l'avoir obtenue, 
essaie de calculer la racine carrée du 
discriminant de l'équation du second 
degré ;: comme ce discriminant est 
négatif, l'affichage se met à cligno- 
ter. On fait alors CLR et SBR 1 : affi- 
chage de u, puis on relance le pro- 
gramme en pressant sur R/S et v est 
affiché à l'arrêt final. 


Seule la mémoire n° 6 n'est pas 
utilisée : M, contient x,, les coeffi- 
cients a,, a, et a, sont respectivement 
en M,, M, et M, ; les registres 4 et 5 
sont des registres de travail et t enfin, 
c'est-à-dire M,, le registre de test, 
contient € . 

Notre premier exemple consistera 
à résoudre l'équation x° - 6x2 + 11 x 
-6 = 0 qui se factorise en {x - 1} (x -2) 
{x - 3) = 0. Après avoir chargé les 
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« Fig. 1 Fig. 2 » 


trois coefficients dans les mémoires 
M,, M: et M, ainsi que la quantité 
e = 106 en M,, on lance le pro- 
gramme en pressant sur RST puis sur 
R/S, et l'on obtient successivement 
r, = 1, = 2etr; = 3. Le temps de 
calcul est de vingt secondes environ. 
Notons que, puisque nous avons pris 
x, = 0 comme valeur de départ, 'a 
première racine calculée est la racine 
de plus faible module. 


Deuxième exemple : résolvons 
l'équation x? - 4 x? + 8x - 8 = 0 qui 
admet x = 2 comme seule racine 
réelle. Après avoir effacé le contenu 
des mémoires M, à M,, on entre les 
trois coefficients de la nouvelle équa- 
tion (-4,8 et -8) en M,, M, et Met on 
lance le programme. Au premier 
arrêt, on obtient bien r, = 2. Au 
deuxième arrêt, l'affichage est cli- 
gnotant {on a tenté d'extraire la 
racine carrée d’un nombre négatif au 
pas 38): cela nous indique que 
l'équation n'a qu'une seule racine 
réelle. On relance alors par CLR et 
SBR 1 : affichage de u qui vaut 1, et 
une pression sur R/S nous donne 
v = 1,7320508 {soit une valeur pro- 
che de V3). Ainsi r>3 = 1 + i V3. 


————— Le quatrième — 
degré 


L'équation x* + a, x? + a, x? + 
ax + a, = 0 possède zéro, deux ou 
quatre racines réelles et le pro- 
gramme que nous allons examiner 


nous les indiquera (si elles 
existent..….). 
ici aussi, nous utiliserons la 


méthode de Newton. Le caicul de 
p (x) et de p'ix) se fera selon la 
méthode de Hôrner : 

px) = x + a,) x + a) x + 43) X + a 


b,—1 
b, —— 
D3 ————" 


et p'{x) = x + b,)x + b,) x + b, 

Cet algorithme est très commode 
car il nous permet de former progres- 
sivement p’{(x) dans la mémoire M4, 
au fur et à mesure que nous avan- 
cons dans le calcul de p(x} aux pas Q 
à 16 du programme. 


Une fois la première racine r, calcu- 
liée, il reste à résoudre l'équation du 
troisième degré p, (x) = 0, avec p, (x} 
= p{x)/{x-r.}, soit x + b, x2 + b, x 
+ b.. Les b; n'ayant pas été conser- 
vés faute de mémoires disponibles, 


Calcul de pt) 


t:x-pfr)/ptQ 


nous les recalculerons à l'aide des a; 


et der, : 

-b; == - &a/r; 
-k, = (b;-a)/r 
eb, =a +ar 


En ce qui concerne l’utilisation des 
différents registres de données, b;, 
occupera la place de a,, b, celle de a, 
b, celle de a,, 1 celle de a, et, bien 
sûr, 0 celle de a, (contenu de M,). On 
réalise ainsi la « déflation » du poly- 
nôme de départ {d'un polynôme du 
quatrième degré, on passe à un poly- 
nôme du troisième degré), et l’on 
continue. On trouvera l'organi- 
gramme correspondant à la fig. 2. 


À titre d'exemple, nous choisirons 
l'équation x4 - 10 x3 + 35 x? - 50 x + 
24 = 0, qui se factorise en (x - 1} (x- 
2) (x - 3) (x - 4) = O0. Après avoir 
introduit les différents aj dans les 
mémoires M,à M, et la quantité £ = 
103% en M,, on lance le calcul avec 
RST R/S. Au premier arrêt, on ar, = 
1 ; au deuxième arrêt r, = 2, puis rs 
= 3etenfinr, = 4 (temps total du 
calcul : environ une minute vingt). 


Ces deux méthodes sont sûres et 
précises, mais on doit signaler qu'il 
existe d’autres méthodes de résolu- 
tion des équations du quatrième 
degré. Certaines d'entre elles sont 
parfaitement exploitables sur la TI 
57 ;: je pense en particulier à la 
méthode dite « des quatients- 
différences » qui est moins gour- 
mande en pas de programme. 


Et maintenant, à quand la résolu- 
tion d’équation du cinquième et du 
sixième degrés sur la T1 57 ? (On peut 
bien rêver, non ?) 


LC: Jean Rosset 
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Au programme, ce soir. 


Voici quelques idées qui dépanneront les 
programmeurs en mal d'inspiration. 

Ils trouveront ici, s'ils le veulent, 
matière à exercer leur talent dans l'art 
des algorithmes et de la programmation. 
Qu'ils n'aillent pas cependant nous retourner 
leurs copies : il ne s’agit pas d’un concours, 
mais seulement de suggestions. 

En revanche, si les lecteurs de FOp 
ont d’autres idées de programmes, 
qu'ils nous les adressent par écrit. 
Celles qui nous paraîtront les plus astucieuses 
et les plus originales viendront 


Les nombres premiers 


et les autres... 


M Petit travail préliminaire: sur 
votre machine, vous commencerez 
par écrire les quelques lignes de pro- 
gramme vous permettant de savoir 
si un nombre donné est ou non pre- 
mier. Ces lignes seront utilisées par 
la suite en tant que sous-pro- 
gramme. 


Pour ceux qui l'auraient oublié, 
rappelons qu’un nombre est premier 
s'il admet seulement deux diviseurs 
donnant un quotient entier : lui- 
même et l’unité. Par convention, on 
admettra que l'unité n'est pas un 
nombre premier. 


Deuxième étape : en utilisant la 
séquence déjà écrite, concevoir un 
programme effectuant une vérifica- 
tion empirique de la conjecture de 
Goldbach. Ce mathématicien affir- 
mait — il y a plus de deux siècles — 
que tout nombre supérieur à 3 est la 
somme d'au plus 3 nombres pre- 
miers. C'est ainsi que 4 = 2 + 2: 
5=3+2:6-3+3;:7- 3 + 
2 + 2, etc. 

On pourra traiter d’abord le cas 
des nombres pairs supérieurs à 2 : 
en introduisant un tel nombre au 
clavier, 150 par exemple, le pro- 
gramme devra retourner deux nom- 
bres premiers dont la somme vaut 
150. 

Vous améliorerez ensuite votre 
programme de facon à ce qu'il 
donne toutes les combinaisons de 
deux nombres premiers dont la 
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alimenter cette rubrique. 


somme est égale au nombre de 
départ, ici 150. Attention : le pro- 
gramme ne devra pas donner deux 
fois la même solution. Ainsi, pour le 
nombre 16, il indiquera 3 et 13 puis 
5 et 11, mais vous ferez en sorte 
qu'il ne donne pas 11 et 5, ou 13 et 
3. Vous ajouterez un compteur qui 
totalisera le nombre de couples de 
premiers trouvés. 


vous introduirez 


Troisième étape : 
un test permettant au programme 


de déterminer si le nombre de 
départ est impair ou pair. S'il s'agit 
d'un nombre impair, le programme 
vous indiquera s'il est la somme de 
deux nombres premiers seulement 
(2 et 13 pour 19 par exemple, ou 2 
et 29 pour 31}, puis il recherchera 
s'il existe des solutions avec trois 
nombres premiers. Dans le cas de 
15, il vous indiquera donc 3, 5 et 7 


qui sont tous premiers et dont la 
somme est effectivement 15. 


Nouvelle modification du pro- 
gramme, plus délicate à mettre en 
œuvre : que le nombre soit pair ou 
impair vous devez obtenir toutes les 
solutions en deux ou trois nombres 
premiers. Ainsi, avec 31 pour nom- 
bre de départ, le programme vous 
indiquera successivement : 2 et 29; 
3,5et23;:3,11et17:5,7et 19; 
5, 13 et 13 — c'est tout. || y a en 
effet pour cet exemple cinq solu- 
tions différentes seulement. La diffi- 
culté consiste ici à ce que le pro- 
gramme ne retourne pas aussi les 
combinaisons : 5, 3 et 23: 7, Set 
3:7,3et5;13,5et 13: 13, 13 et 
5 ; 29 et 2, etc. qui, de fait, ont 
été déjà trouvées. 

En continuant sur la même idée, 
vous pourrez également écrire un 
programme vérifiant qu'un nombre 
impair À supérieur à 5 est la somme 
d'un nombre premier B et d'un 
second nombre premier C multiplié 
par 2. Exemples : 

7-3 + (2 


9 = 3 + (3 x 2] = 5 + (2 x 2) 
11-5+1(3 x 2) = 7 + (2 »x 2) 
13 = 3 + (5 x 2) = 7 + (3 x 2) 
etc. 

Enfin, si vous découvrez — par 


extraordinaire — un nombre supé- 
rieur à 3 qui ne soit pas la somme 
d'au plus trois nombres premiers, 
vérifiez votre programme très attive- 
ment. S'il ne comporte aucune 
erreur, vous avez fait une décou- 
verte : la conjecture de Goldbach 
n'a en effet jamais été prise en 
défaut depuis qu'elle a été formulée, 
c'est-à-dire depuis 1742. 


: Jean Drano 
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Ah ! 


Si vous aviez su... 


Vous ne connaissez pas 
votre machine à fond, 

et moins encore 

les autres machines... 

Ces quelques “ficelles” 
vous montreront 
comment on peut toujours 
en tirer un peu plus. 


Quatre petits tours 
et puis s’en vont... 


M Sur le FX-702 P (comme sur le 
PB-100), les fonctions trigonométri- 
ques rechignent dès qu’elles sont 
appliquées à des angles correspon- 
dant à plus de quatre rotations. Elles 
conduisent régulièrement à l'affi- 
chage d'un message d'erreur (ERR- 
3). 11 faut donc tenir compte de 
cette anomalie lorsque les fonctions 
SIN ou COS peuvent être appli- 
quées dans un programme à des 
valeurs angulaires très élevées. 

La solution consiste à remplacer 
des séquences telles que 10 Y — 
SIN X ou Y = COS X par: 
e10 X = FRAC (X/360} * 360 : Y 
= SIN X pour les degrés ; 

e 10X = FRAC (X/{2+#n)#2#n : 
SIN X pour les radians ; 

+ 10 X = FRAC (X/400)*400 : Y — 
SIN X pour les grades. 

C'est bête comme chou, évidem- 
ment, et l’on s'étonne même que 
Casio ne l'ait pas préprogrammé 


Ÿ = 
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dans ses poquettes à l'intention, 
entre autres, de ceux et celles qui 
pratiquent l'astronomie {ou l’astrolo- 
gie). 


[ Laurent Cessac 


Un petit utilitaire 
pour le PC-1500 


M En mode RESERVE, assignez à une 
touche la séquence CALL 58175 @ qui 
a pour effet d'appeler la routine de 
l’auto-extinction du poquette. En 
mode RUN, pressez cette touche et 
votre PC-1500 s'éteindra comme s’il 
le faisait de lui-même après dix 
minutes d'inactivité, en conservant 
toutes les informations utiles (poin- 
teurs...). Pour le rallumer, il suffit de 
presser ON, l'indicateur BUSY est 
visible mais c'est un « mirage », 
repressez ON et il disparaîtra. 


Vous aurez remarqué que l'impri- 
mante ne débite plus à l'allumage 
ces cinq lignes de papier rigoureuse- 
ment inutiles, de même qu'elle ne 
fait pas « tourner » ses stylos. 


[ji Jean Landgrave 


Une notation “ingénieur” 
pour le PC-1211 


M Voici cinq lignes de programme 
qui vous permettront d'obtenir les 
résultats de vos calculs en notation 
dite “ingénieur”, c’est-à-dire avec 
un exposant de 10 qui soit un muiti- 
ple de 3. Sur le poquette de Sharp 


en effet, un tel affichage ne peut 
pas s'effectuer à l'aide d'un simple 
USING. 


Le mode d'emploi du programme 
est très simple puisqu'il suffit, en 
mode DEF, de faire normalement 
ses calculs puis de demander 
SHFT, pour que le résultat soit 
affiché n notation ingénieur. 


Une notation “ingénieur” 
Programme pour PC-1211 
Auteur Jérôme Grandjanny 
Copyright l'Ordinateur de poche 
et l'auteur 


105 "K"AFERD 5 
IF AE£ KLET 
E=IHT LOG 
RES xarMax] 
QUE: GOTG 20 


20: PRINT "Mie 
END 

30: D=E-Z#INT “E 
EEE - Lt tts 
LI DEF 

40: USING 

SO:FRINT Mi E" 
SUSINE ‘taie 
ELUSING à 
END 


Pour mémoire, je rappelle la table 
de notation : 


Exposant 
— 12 


Appellation 
pico 

nano 

micro 

milli 

kilo 

Méga 

Giga 

Téra 


++++i 
ND © O Lo Où  LO 
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Cela sera, je l'espère, utile à tous 
les lecteurs qui appréciaient cette 
forme de notation sur les calculatri- 
ces scientifiques classiques. 


D Jérôme Grandjanny 


Quand le moindre pas 


coûte... un octet 
(PC-1211) 


B Si vos programmes parfois se 
sentent vraiment à l'étroit dans 
votre PC-1211 ou votre PC-1, voici 
différents procédés qui vous permet- 
tront de gagner les précieux octets 
qui vous font défaut : certains de 
ces ‘trucs’ sont très connus, 
d'autres le sont moins. 


Dans le cas des adressages 
symboliques, GOTO ‘'A'" par exem- 
ple, vous pouvez supprimer les deux 
points qui suivent l'étiquette. La 
ligne 10 : “A” : INPUT A devient 
ainsi 10 : ‘A’ INPUT À, et c’est un 
pas de gagné... 


Lorsqu'une ligne se termine par 
des guillemets, vous pouvez égale- 
ment les supprimer. C’est ainsi que 
10 : PRINT ‘’AU REVOIR..." devient 
10 : PRINT “AU REVOIR. Encore 
un pas de gagné. Dans ce dernier 
cas toutefois, il vous faudra veiller à 
ne pas laisser d'espace à la fin de 
votre ligne. L'espace en effet est un 
caractère invisible. Si vous l'avez 
utilisé à la place de l'instruction DEL 
pour abréger le message affiché par 
PRINT, il demeure, et vous devez 
donc le supprimer, avec DEL bien 
entendu. 


De la même façon, quand une 
ligne se termine par une ou plusieurs 
fermetures de parenthèses, on peut 
les supprimer. Cette façon de faire 
peut donner des sueurs froides aux 
habitués de la notation algébrique, 
mais elle n'a pas de conséquences. 
On remplacera donc 10 : A = 10 * 
{(B+(C-—-3)) par 10: A = 10+ 
{B+1(C—3 en gagnant du coup deux 
octets. 


Doit-on faire afficher ou imprimer 
par un programme une instruction 
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Ah ! 


si vous aviez su 


du Basic ? Voilà l’occasion d'écono- 
miser encore un peu de mémoire 
vive. Nous prendrons pour exemple 
les trois lignes suivantes : 

10 : INPUT A 
20 : B = COS A 
30 : PRINT ‘COS 


Ce programme occupe trente pas. 
A lui seul, le COS de la ligne 30 qui 
est suivi d'un espace en consomme 
quatre. Or il est bien connu que les 
instructions du Basic n'occupent 
qu'un octet sur le PC-1211, y com- 
pris l’espace. On peut profiter de 
cette facilité en introduisant la ligne 
30 comme suit : 30 PRINT COS ; 
A: ‘“=":; B ENTER. On insère 


ensuite les guillemets entre PRINT 
et COS et juste après COS. Le texte 
délimité par les guillemets est alors 
codé sur un seul octet : on a donc 
gagné trois octets. 


On sait par ailleurs que À * 
10000000 peut s’écrire À * E 7, soit 
quatre octets au lieu de dix. Mais on 
peut faire mieux: E7A (trois 
octets). L'exposant doit alors être 
une valeur numérique : EAB vaut 
E0AB et donc Ax*B. Si l’exposant 
est une variable, il faut en revenir à 
B*E À. 


Moins connu sans doute, et assez 
énigmatique à vrai dire: on peut 
encore gagner un octet en suppri- 
mant le LET après un IF portant sur 
une chaîne de caractères. Et c'est 
ainsi que 10 : IF AS = “OUI” LET 
B=2 devient 10 : IF AS = “OUI 
B=2. 

Cette dernière possibilité confirme 
que le poquette de Sharp réserve 


aux chaînes de caractères un traite- 
ment particulier sur lequel toute la 
lumière n'a pas été faite. 

En espérant vous avoir évité quel- 
ques pas inutiles. 


C1 Philippe Boever 
DS ="; 


Le saviez-vous ? 
(FX-702 P) 


B Voici quatre petites astuces qu’il 
n’est pas inutile de rappeler : elles 
ne sont sans doute pas connues de 
tous les utilisateurs du 702 P. 


Contrairement à ce que l'on peut 
lire à la page 53 de la notice de cette 
machine, on peut très bien deman- 
der une partition de la mémoire 
jusqu'à DEFM 20, et non pas seule- 
ment jusqu'à DEFM 19 (il reste alors 
80 pas de programme, mais on dis- 
pose de 226 variables). 


La touche ANS, d'autre part, per- 
met de rappeler à l'affichage le 
résultat du dernier calcul effectué, 
mais elle permet aussi de rappeler le 
dernier affichage numérique obtenu 
par la fonction PRT. Si vous faites 
MODE 1, 10 PRT n/2, EXE, 
MODE 0, RUN, EXE, VAC, EXE et 
ANS, vous retrouvez bien la valeur 
de n/2 à l'affichage, et cela malgré 
l'ordre VAC ! 


Autre chose maintenant : si vous 
voulez désigner une variable particu- 
lière comme A(0) ou A(6), vous 
pouvez gagner facilement deux 
octets à chaque fois : il suffit d’indi- 
quer AO ou A6. 


Enfin, lorsque vous entrez une 
ligne de programme longue, très 
longue, vous finissez par atteindre la 
limite fatidique des 62 caractères du 
« tampon d'entrée ». Qu'à cela ne 
tienne : revenez en arrière et effacez 
tous les blancs avec la touche C, 
puis terminez la ligne et pressez sur 
EXE. Cela ne vous suffit pas ? Relis- 
tez alors la ligne : l'ordinateur a de 
nouveau inséré des blancs que vous 
pouvez eux aussi supprimer pour 
ajouter encore quelques instruc- 


tions. 
C1 Serge Boisse 
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Un pot commun 
pour toutes 
les machines 


Au clavier de votre HP 41C, 
transposez la musique 


M |! sdvient quelquefois que l'on ait 
à transposer les accords d’une parti- 
tion musicale, à cause de l'instru- 
ment que l'on accompagne, cet 
« instrument » pouvant d'ailleurs 
être la voix d'un chanteur. Ces 
transcriptions d'accords ne compo- 


Transposition musicale 
Programme pour HP-41 C 
Auteur Joël Benalouane 
Copyright l'Ordinateur de poche 
et l'auteur. 


QteLBL "MUS" 
"20" ASTO 81 
ASTO 62 "RE" 
“HIb” ASTO 84 
ASTO 85 *FA* 
"Fa  ASTO 87 
ASTO 98 “LAb” 
"LA" ASTO 18 “SIb* 
ASTO 11 “SI” ASTO 12 
AGN “HOTE LUE ?" 

PROMPT ASTO 68 

XEG IND 98 i - STD 18 
“NOTE JOUEE ?*  PROMPT 
ASTO 98 CLA XEG IND 06 
RCL 18 - Xx(z=87 XED 81 
STO 88 ARCL IND 68 

ASTO 16 ER 02 


SLUR: 
1 RTK 


Se+LBL 
"Box" è RTH 
ASTU 03 
“pl L] 
ASTO 66 
"SQL" 
AST9 89 


6deLBL 
3 RTN 


63+LBL 
4 RTH 


66+LBL 
5 RTN 


69LBL 
6 RTN 


7è+LBL 
? RTH 


479LBL 6i 
12 + RTK 


73eLBL 
8 RTH 


78+LBL 
3 RTN 


St+iBL 92 
KEQ IND 16 GTO 81 
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sent pas la partie la plus agréable de 
la musique ! Ainsi, si vous voulez 
hausser d'un ton DO-SOL-LA-SI, 
que devient votre accord ? RE-LA:- 
SI-DO # . Pas évident pour tous ? 
Demandez donc à votre HP. 

XEQ « MUS » et elle vous 


…. BIéLBL LA" 
18 RTN 


*20* 


B4+LBL "SIb" 
11 RTH 


“I0+° 


87eLBL "SI" 
12 RTH 


"RE" 


98+LBL 81 
1 - ST0 13 


LIU 


S4sLBL 62 

“QUELLE NOTE?" PROMPT 
ASTO 15 XEQ ID 15 
610 14 RCL 13 REL 14 
+ STO 17 ST0 68 13 
ENTERT RCL 17 STO x 
K{Y? GTO 93 12 - 
STO 88 


“N!° 


“Fa" 


"FR" 


li4eLBL 83 

CLA POUR," ARCE 15 
“HLUE" AVIEN PSE 
“JOUER:" ARCL IND 88 
AVIEN STOP GTO 82 ENE 


“S0L” 


“LAb* 


demande « NOTE LUE ?», vous 
répondez DO. « NOTE JOUEÉE ? », 
répondez RE. Maintenant quelle 
note voulez-vous transposer : 
« QUELLE NOTE ? », entrez SOL il 
vous sera répondu LA, LA devient 
SI et, enfin, S! donne DO #. Vous 
voyez bien |! 


Si les bémols apparaissent correc- 
tement notés « b », les dièses sont 
affichés sous la forme d'un astéris- 
que car le caractère # n'existe pas 
sur la HP. Les qualificatifs « mineur, 
7e, diminuée... » ne changent pas, 
aussi le programme n’en tient-il pas 
compte. 


[ i Joël Benalouane 


Grandes 
factorielles en 
notation scientifique 


M On a déjà trouvé dans /‘Op, pour 
différentes machines, des program- 
mes de calcul de grandes factorielles 
en multiprécision (1). Ils permettent 
d'obtenir des résultats exacts à 
l'unité près, mais ils sont tout de 
même limités à des nombres relati- 
vement peu élevés et demandent 
des temps d'exécution assez longs. 

Quand on à besoin de connaître la 
valeur de 100 f ou 1000 ! ou de fac- 
torielles beaucoup plus grandes 
encore (pour des études statistiques 


{1} Sur TI 58/59, voir l'Op n° 5 page 55 ; sur 
PC-7211, l'Op n° 7 page 68 et sur HP 41, l'Op 
n° 70, page 68. 
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par exemple), on se contente la plu- 
part du temps d'une précision limi- 
tée. Comment utiliser d'ailleurs des 
nombres ayant plusieurs centaines, 
voire plusieurs milliers de chiffres ? 
A titre indicatif, 100 ! est un nombre 
de 158 chiffres. Dans la plupart des 
cas pourtant on se contenterait de le 
voir exposé en notation scientifi- 
que : 100! = 9,33262154439%4 x 
10157. 


Mais, même sous cette forme, les 
ordinateurs de poche ne peuvent 
pas traiter d'aussi grands nombres : 


Grandes factorielles 

Programme pour FX-702P 

Auteur Guillaume Brun 

Copvright l'Ordinateur de poche et l'auteur 


18 VAC 

20 IHP “VALEUR: R 
J6 FOR 1=1 TOR 
4 ic FHEXT 


S6 PRT A571 ="; 16? 
FRAC B57e75 IT 


El 
68 GOTO 18 


Grandes factorielles 
Programme pour HP 41C 


gi CLRG 
42 519 90 
43+LBL 94 
g4 LOG 

95 ST+ 81 
46 REL 98 
a? Î 

98 - 

09 STD 84 
ia x29? 
11 GT0 88 
12 ROL 1 
13 ENTERT 
14 FRC 

15 i8tx 
16 BEEP 
{7 STOP 
13 RÈN 

19 INT 

28 STOP 
èt END 
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Un pot commun 
pour toutes 


les machines 


‘Grandes factorielles 
Programme: pour: T157 
Auteur Guillaume Brun 
‘Copyright l'Ordinateur de poche et l'auteur 
STO 0 
2nd Lbi 0 
2nd. Log 


00 . 32 0 
01 Ô 
02 

03 = 
| SUM 1 
RÇCL 1 


07. 1 
08 = 
‘08 É STO 0 

10 INV 2nd x=t 
1: GTO 0 

12 RCL 1 

13 INV.2nd Int 
14 INV 2nd Log 
15 R/S 

16 REL 1 

17 2nd int 

18 R/S 

19 RST 


“Avant. d'utiliser le programme, ne 
pas. oublier de vider.les registres 1 et 


Grandes factorielles 
Programme pour PC-1211/1212. 
1251 et 1500. PC:-1 et PC-2 


10: CLERE 


SOt INPUT YALEU 
FE 7 "in 

aQtI=t+1 

dCO: EzB+LEis I 

SOEIF GYITHEN 3 

SQ: CE INT 
F: NT E 

TOSÉEER itPEINT 
WE izViCs “£" 
1E 

BOT ENT I 


en notation scientifique, l'exposant 
ne dépasse pas 99, il est donc hors 
de question de calculer directement 
la factorielle des nombres supérieurs 
a 69. 

y a plusieurs façons d’aller au- 
delà, et de calculer par exemple les 
factorielles de nombres beaucoup 
plus grands (1000 !, 10000 !, etc.}. 


Grandes factorielles 

Programme pour TI 58/59 

Auteur Guillaume Brun 

Copyright l'Ordinateur de poche et l'auteur 


Avant utilisation, faire 2nd CMS. 
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TI 57 9,3326165 

T1 59 9,332621492 
HP 41C 9,332622518 
PC-1211 9,332622517 
PC-1251 9,332622517 
PC-1500 9,332622517 
FX-702P 9,332621271 


100! - 9,332621544... E 157 


Comme on le voit, la précision 
du résultat obtenu et le temps 
de calcul varient sensiblement 
d’une machine à l’autre. 


La méthode repose sur l’utilisation 
de la fonction préprogrammée LOG 
et le principe en est le suivant : la 
fonction inverse du logarithme déci- 


mal est 10%, ainsi log 10* = 10109 x 
= x (on écrira 10 À log x = x). Le 
nombre nl = n (n-1) (n—2).…. 
2x1,oun! = 10Alogn *x 10 Alog 


{n—1) x,,.x 10 À log 2 x 10 A 
log 1, ou n! = 10 A [logn + log 
{n-1) +...+ log 2 + log 1] 


Résultats obtenus 


Durées des calculs 
E 157 


137 secondes 
Ë 157 69 secondes 
E 157 47 secondes 
E 157 68 secondes 
E 157 26 secondes 
E 157 14 secondes 
E 157 20 secondes 


Le nombre entre crochets peut 
s'écrire sous la forme E + D où E est 
sa partie entière et D sa partie déci- 
male. Alors si nl! = mantisse +10 A 
exposant, la mantisse est égale à 
10D et l'exposant à 10€. 


Vous trouverez ci-contre les diffé- 
rents programmes correspondant à 
cette méthode de calcul. Bien 
entendu, la précision limitée de la 
fonction LOG, la troncature ou 
l'arrondi des résultats successifs 
font que l'on ne doit pas tenir 
compte des derniers chiffres de la 
mantisse. Mais on obtient tout de 
même un bon ardre de grandeur. 


C} Guillaume Brun 


Le jeu du Notouane 
sur TI 57 


M Voici une version pour TI 57 du 
Notouane (en anglais Mot One), jeu 
qui se dispute ordinairement avec 
deux dés. Votre micropoche ici ne 
fera que jeter les dés et jouer le rôle 
de l'arbitre. Vous devrez donc 
rechercher un adversaire en chair et 
en os {1). 


IH s'agit d'obtenir le plus grand 
nombre possible de points en lan- 
cant, jusqu'à dix fois de suite si on 
lé veut, une paire de dés. Mais 
attention : le premier jet de dés 
décide de la suite du jeu car le nom- 
bre qu'il donne — compris entre 2 
et 12 — ne doit pas ressortir lors des 
lancers suivants (not one signifie en 
angiais : « pas le premier »). 


Si le premier joueur obtient 7 en 
premier lieu et décide de relancer les 
dés, son total augmentera du nom- 
bre tiré. Mais s’il vient à refaire 7, il 


{1} On trouvera dans l'Op n° 2 (pages #0 et 
51} un programme de Notouane pour PC- 
1277, PC-1,; et dans l'Op n° 7 (pages 65 et 
66} une version adaptée au FX-702 P. Sur ces 
deux dernières machines, le programme joue 
contre l'utilisateur. 
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perd tous ses points. Il faut donc 
estimer soi-même les chances que 
l'on a de ne pas obtenir le même 
nombre que celui qui est sorti au 
premier jet de dés. À chaque fois, 
on doit estimer le pour et le contre : 
augmenter son total ou le réduire à 
néant. 


Lorsqu'un des deux joueurs passe 
la main, soit qu'il ait perdu, soit qu'il 
ait sagement décidé de conserver 
son capital, l’autre lance ies dés à 
son tour en appliquant iles mêmes 
règles. 


Une partie complète se dispute en 
sept manches, et à l'intérieur d'une 
manche chacun des joueurs peut 
tenter jusqu'à dix lancers successifs. 
Le gagnant est celui qui, à la fin de 
la partie, aura totalisé le plus de 
points. 


Une fois introduit le programme 
dans la TI57, on obtiendra le pre: 
mier lancer dy premier joueur en 
pressant sur les touches RST et 
R/S. Un premier chiffre apparaît un 
instant {instruction Pause) : c'est le 
score à ne pas refaire. Le nombre 


qui s'affiche ensuite est celui qui a 
été obtenu grâce au second lancer. 
Il est immédiatement suivi par la 
valeur du capital de points accumu- 
lés. 

Les lancers suivants se comman- 
dent simplement par R/S : affichage 
du nombre tiré suivi par celui du 
capital. Bien entendu, si le nombe 
qui sort est identique au premier, on 
a perdu : une série de 9 clignotants 
l'indique alors. 


Le jeu du second joueur com- 
mance avec SBR 0 (premier lancer : 


Jeu du Notouane 
Programme pour TI 57 

Auteur Alexandre Toso | 
Copyright l'Ordinateur de poche 
et l’auteur 


SBR 0 
01 STO 1 
STO 7 
03 2nd LBL 3 
SBR 0 
05 : 2nd INV x-t 
GTO 2 
07 0 
STO 1 
1/x 
2nd LBE 2 
SUM 1 
RCL 1 
R/S 
GTO 3 
2nd LBL 6 
STO 7 
STO 2 
2nd EBL 4 
SBR 0 
2nd INV x=t 
GTO 5 
0 
STO 2 
1/x 
2nd iBL5 
SUM 2 
RCL 2 
R/S 
GTO 4 
2nd LBL 0 
RCL 0 
+ 
n 


ss N 


3 
6 
7 
2 
4 
0 
5 
2 
5 
2 
2 
à 
0 
0 


fl 


“< 
x 


Bu n 


d INV Int 


— 
*. © 
© 


_2nd PSE 
INV SBR 
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score interdit) suivi de SBR 6 
(deuxième lancer et capital accu- 
mufé). Tous les lancers suivants se 
commandent par SBR 4 puis R/S, 
R/S, etc. jusqu'à la fin de la man- 
che. C'est alors au premier joueur 
de jeter les dés, et il procède de la 
même façon qu'au début. 


[1 Alexandre Toso 
PT 


Le bon poids 
sur ZX 81 


B Rappelons brièvement les règles 
du jeu (1). Sur l'un des plateaux 
d'une balance Roberval se trouve 
placé un objet pesant un nombre 
entier de grammes, nombre compris 
entre 1 et 200. On doit déterminer 
quel est le poids exact de cet objet. 
Pour ce faire, on dispose d’une 
boîte de poids contenant neuf mas- 
ses pesant respectivement : 

+ masse n° 1: 1 gramme 

° masse n° 2 : 2 grammes 


Balance Roberval 
Programme pour ZX 81 
Auteur Etienne Colella 


Copyright l'Ordinateur de poche et l'auteur 


BUCHODDDDDPIDID 
2 OPOMUUELAURE 
a hou 


et HN HA NU M #4 


{ 
{ 
{ 
{ 
€ 
{ 
Û 
{ 
{ 
{ 
O 
$ 
= 
$ 
J 
= 


O0 JOUR Li (9 RIO 2 


NYbPhpPhbhBREÉME 
6+56999908C9S018 00 
C2 


Le, 
PRINT ZL;': 
NEXT _I 


LET T=20 
PRINT AT 3,289; "COLP {SI ="; C0 
PRINT AT 6,12; ‘"UUTRE 
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9 
“27AUDI:TAS 7:B#l 


Un pot commun 
pour toutes 


les machines 


masse n° 3 : 
masse n° 4 : 
masse n° 5: 
masse n° 6 : 
masse n° 7: 
masse n° 8 : 50 grammes 

masse n° 9 : 100 grammes 


Bien entendu, vous n'avez besoin 
ni de balance ni de poids : le ZX se 
charge de les simuler. Le tout con- 
siste donc à placer sur le plateau 
vide, en un minimum d'essais, les 
différents poids qui mettront la 
balance en équilibre. 


Lorsque le programme demande 
« VOTRE MASSE ? », vous devez 
répondre d’abord par le numéro du 
poids choisi puis appuyer sur NEW- 
LINE. La question «P ou R?» 
s'affiche aussitôt : voulez-vous 
poser (P) ce poids sur votre plateau 
de la balance ou, si c'est déjà fait, 
l'en retirer (R}) ? Vous répondez sim- 
plement en pressant sur la touche P 
ou R. Quatre possibilités se présen- 
tent alors : 


2 grammes 
5 grammes 
10 gramrnes 
20 grammes 
20 grammes 


{1) Le programme pour PC-1211 et PC-1 a été 
publié dans Op n° 9 pages 52 et 53, et pour 
HP-41 C dans l'Op n° 11 page 64. 


INPUT 
IF CAE PA 2" M29 THEN 


GOTO 


° Vous avez demandé à poser sur la 
balance un poids qui s’y trouve déià, 
ou bien vous avez demandé à en 
retirer un qui n'y est pas : le pro- 
gramme vous demande de nouveau 
ce que vous désirez faire. 

° Vous avez vu trop grand : le pla- 
teau penche de votre côté et le pro- 
gramme vous l'indique. À l'essai sui- 
vant, il vous faut retirer un poids, 
mais lequel ? 

° Vous n'avez pas encore fait le 
poids ; le ZX affiche « TROP 
PETIT ». 

° Enfin, vous avez réussi à trouver le 
juste équilibre : les deux plateaux de 
la balance flottent l’un et l'autre 
dans l’espace : vous avez gagné. 


I! ne vous reste plus qu’à recom- 
mencer une partie en essayant 
d'aboutir à la solution plus rapide- 
ment. De proche en proche, la 
réflexion aidant, on doit trouver 
quelle est la meilleure méthode. Une 
fois que cette méthode a été décou- 
verte, le jeu perd évidemment beau- 
coup de son intérêt, mais alors, et 
alors seulement, on peut se dire que 
l’on a vraiment gagné. 


D Étienne Colella 


GOTO 3e 


PRINT +4T 6,12," 
Lee F=1 TO 398 
EXT 


DOTO 


F 
300 


PRINT AT 6,12; "P OU R?7 
IF ENREV Su"P THEN GOTO 


LET 
LET 


G0TQ 


R 
HME (8) 


MASSE? 668 STOP 


(MI <>" 


(-] 
LU 4 >": 
ET te {a 
TH 


PRINT 
INT 


+18 
THEN G0OTO 4958 
THEN GOTCG 359 


“p" 


THEN GOTO 350 


Ets 
EN PRINT AT 6, Se 


TO 
PRINT TRB 7; B#4tr) 
NEXT 
IF TeN THEN GOTO 650 


AT 20,0; "ISSN 
“C""ETAIF “5 N; LL GRA 
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Reportez-vous 
à la bonne page 


(PC-1500) 


La notice d'utilisation du PC-1500 
comporte une table des matières et différents index. Il y manque 
toutefois un index général récapitulant dans l’ordre alphabétique 
tous les mots réservés du Basic et les pages qui leur correspondent. 
Le voici. Il devrait vous permettre de ne plus perdre 
de temps à feuilleter votre manuel à la recherche d’une instruction. 


* L'astérisque signale les ordres 
Basic qui ne sont pas explicite- 
ment décrits dans le manuel, 
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un ancêtre... 


En 1974, la HP 55 
tenait le haut du pavé. 
Elle n’a pas démérité ; 
de nombreux exemplaires 
restent utilisés, 

mais le haut du pavé, 
depuis neuf ans, 

a singulièrement grimpé. 


Hewlett Packard 55 


H Parmi les premières programma- 
bles commercialisées par Hewlett- 
Packard, la HP 55 a beaucoup séduit, 
malgré son prix d'environ 2 5C0 F 
quelque peu prohibitif alors. D'une 
solidité à toute épreuve elle est de 
plus protégée par un étui rigide. Sont 
également fournis avec la machine le 
chargeur et le bloc d'accumulateurs, 
un second étui, souple, le manuel 
d'utilisation qui comporte (lui!) un 
index alphabétique, un précieux aide- 
mémoire et, enfin, des feuilles vierges 
de programmation. 

Le manuel, du type «bref mais 
complet », donne à l'utilisateur le 
mode d'emploi de son poquette mais 
ne constitue en aucun cas une initia- 
tion à la programmation. Deux biblio- 
thèques de programmes bien four- 
nies, l'une de mathématiques et 
l'autre de satistique, offrent de bons 
exemples de programmation. Une 
petite astuce : la fiche mémoire qui 
est collée au dos de la HP 55 et per- 
met de retrouver un détail (générale- 
ment important !} malencontreuse- 
ment oublié, tel que la répartition des 
données statistiques dans les diffé- 
rentes mémoires... On ne peut que 
regretter qu’une aussi bonne idée ne 
soit que rarement reprise sur les 
machines actuelles. 

Les fonctions préprogrammées, 
nombreuses, sont accessibles direc- 
tement ou à l’aide des touches de 
préfixe (désormais classiques) f et g. 
On trouve notamment : 

« SIN, COS, TAN et leurs inverses 
dans les trois modes angulaires RAD, 
DEG et GRAD ; 

e des conversions DEG-RAG, sexa- 
désimal-décimal, coordonnées polai- 
res-rectangulaires, mesures anglaises - 
métriques ; 

° Ln, ex, log, 10*, Vx, x2, nl, % avec 
dix chiffres significatifs, CHS, FIX, 
SCI, 

eZ+, XZ-, écarttype (o_:}, 
moyenne arithmétique, régression 
linéaire et interpolation. 

Au chapitre des mémoires, la 
HP 55 possède bien entendu les 5 
registres de la pile opérationnelle, 
standard en notation polonaise 


inverse : X, Y, Z, T et LAST X, et 20 
registres accessibles à l'aide de STO 
et RCL (0 à 9 et. O à . 9}. Les opéra- 
tions directes telles STO+n STO/n 
sont possibles. 

Les programmes sont, comme les 
données, « volatiles » c'est-à-dire 
perdus dès l'extinction de la machine, 
ce qui était le lot de toutes les calcu- 
latrices à l'époque. Cinquante pas de 
programmes, ou plutôt 50 octets, 
sont disponibles et c'est bien peu car 
certaines fonctions simples telles RCL 
n ou (fix? occupent deux octets cha- 
cune. On choisit le mode programme 
à l’aide d’un interrupteur du type « à 
glissière » ; trois positions possibles : 
RUN, PGM et TIMER. Bien entendu, 
les classiques BST et SST permet- 
tent de voir le programme en 
mémoire. Cependant, on ne peut ni 
insérer ni supprimer une instruction 
dans un programme et cette con- 
trainte en rend vraiment pénible la 
mise au point. 

«a La HP885 est une calculatrice 
incroyablement souple ». Voici la pre- 
mière phrase de l'introduction du 
manuel. Le développement depuis 
10 ans des calculatrices a heureuse- 
ment apporté des modifications subs- 
tancielles à cette notion de « sou- 
plesse » car la HP 55 est tout de 
même d'un usage délicat. Sa lenteur 
d'abord : 45 secondes pour une bou- 
cle de 1 à 100 contre moins d'une 
seconde sur les derniers poquettes 
Basic ! 


De nombreuses 
fonctions, dont l'uti- 
lité ne s'est imposée 
que peu à peu, man- 
quent à l'appel: DSZ, 
INT, FRAC, PAUSE, ABS... 
Seulement deux tests : x<y 
et x=y qui obligent à des 
contorsions acrobatiques dans la 
pile opérationnelle. De plus, avec 
ces tests, seul un branchement vers 
un numéro de pas est possible. Pas 
de drapeaux (flags) ni d'adressage 
indirect, ni surtout de sous-pro- 
grammes. 

Enfin, les instructions de manipula- 
tion de la pile sont réduites à ENTER 
t,Riet X +. Comment s'étonner 
alors que la résolution d’une équation 
du second degré sur la HP 55 occupe 
33 pas contre 16 seulement sur une 
machine plus récente comme la 
HP 41 C? Rendons hommage aux 
ancêtres programmeurs. 

Du côté des originalités, le timer de 
la HP 55 en est une de taille: ce 
n’est pas une horloge, mais un chro- 
nomètre, précis au 100° de seconde. 
La touche R/S, en mode TIMER, 
déclenche ou stoppe la marche du 
chronomètre. Jusqu'à dix temps inter- 
médiaires peuvent être stockés dans 
les mémoires 0 à 9 sur simple pres- 
sion des touches numériques et ceci 
sans arrêt du chronomètre. A l'aide 
de la fonction HMS +, toutes sortes 
de calculs sur les temps sont autori- 
sés sans que l’on ait pour autant à 
traduire des HHMMSS (heures- 
minutes-secondes}) en nombres déci- 
maux. 

La HP 55 est donc une machine 
encore utilisée surtout grâce à ses 
nombreuses fonctions préprogram- 
mées (calcul scientifique} ét parce 
qu'elle permet tout de même d'intro- 
duire de courts programmes en 
mémoire. Sa robustesse et son chro- 
nomètre à diodes électroluminescen- 
tes rouges en font, par ailleurs, un 
outil appréciable pour les photogra- 
phes tirant leurs clichés dans l'obscu- 
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En raison des fluctuations monétaires, ces prix sont susceptibles d’être modifiés scme préavis. Nous consulter pour confinmation. 
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APPLE Il 


Le plus populaire des micro-ordina- 
teurs. 48 K RAM. Basic Applesoft. Une 
gamme incomparable de logiciels et 
d'accessoires. 


Applell+ 48K + Disk avec Contrôleur 
+ Moniteur 12” 


SHARP PC 1500 


Ordinateur de poche de 185 Ko de 
mémoire vive extensible avec module 
de 8K CE 158. 


CE 150 


Mini table traçante 4 couleurs directe- 
ment connecteble sur PC 1500, Inter- 
face K 7 incorporé. 

PC 1500 + CE 150. 
CE 158 


BOUTIQUE 


EPSON HX 20 


Un système compact 
clavier écran 
LCD avec imprimante. 


Micro K 7. 
Extension 16K. 


EPSON 

Imprimantes de haute qualité d'im- 
pression.Interface parallèie type Cen- 
tronics. 

MX 80 FT: 80 cps. 

où 132 compressés. 0F 


MX 100 : 100 éps. 132 caractère 
où 233 compressés. 8200F 


APPLE III 


L'outil professionnel par excellence. 
128 Ko ou 256 Ko. Unité de disque 
incorporée. Sortie RS 232. Nombreux 
interfaces disponibles. Adjonction 
possible d'un disque dur de 5 méga. 
Profilé. Ecran vert haute résolution 
antireflets. Clavier Azerty - OQwerty. 


Nous consulter. 
ENCORE MOINS sue 


COMMODORE VIC 20 

Un vrai micro-ordmateur puissant et 
évolutif idéal pour l'initiation comme 
pour la pratique de la programmation. 


16 couleurs RAM 365 K. 
Version en PAL. 5350€) 


e ATARI 400 et 800 

e APPLENE 

e CASIO PB 100 

e SHARP EC 1251 

e SHARP PC 1212 

e INTERF. RS 232/PC 1500 
e VICTOR Il 48 K HR 


TO 7 THOMSON 


Un ordinateur 100% français 8 Ko 
extensible à 42 Ko. Fourmiavecunlec- 
teur optique. Sortie couleur Péritel. 
Clavier Azerty accentué. 
Idéal pour 

apprendre en famille. 
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